gmake之4.8 Special Built-in Target Names - .PRECIOUS

4.8 Special Built-in Target Names - .PRECIOUS
The targets which .PRECIOUS depends on are given the following special treatment: if make is killed or interrupted during the execution of their commands, the target is not deleted. See Section 5.6 [Interrupting or Killing make], page 49. Also, if the target is an intermediate file, it will not be deleted after it is no longer needed, as is normally done. See Section 10.4 [Chains of Implicit Rules], page 107. In this latter respect it overlaps with the .SECONDARY special target. You can also list the target pattern of an implicit rule (such as ‘%.o’) as a prerequisite file of the special target .PRECIOUS to preserve intermediate files created by rules whose target patterns match that file’s name.

簡單的說就是當make在執行某個target的時候，如果make被kill或者被interrupted(ctrl+c)，那麼target file就會被刪除，如果加到.PRECIOUS就不會刪除。

brook@ubuntu:~$ more Makefile
#.PRECIOUS: obj/x.o
obj/x.o:
        gcc -c x.c -o obj/x.o
        sleep 5;
brook@ubuntu:~$ make -f Makefile
gcc -c x.c -o obj/x.o
sleep 5;
^Cmake: *** Deleting file `obj/x.o'
make: *** [obj/x.o] Interrupt

brook@ubuntu1:~$ more Makefile
.PRECIOUS: obj/x.o
obj/x.o:
        gcc -c x.c -o obj/x.o
        sleep 5;
brook@ubuntu1:~$ make -f Makefile
gcc -c x.c -o obj/x.o
sleep 5;
^Cmake: *** [obj/x.o] Interrupt

brook@ubuntu1:~/excerise/Make$

TCL Basic Syntax

這一篇是研究所時候寫的，幸好還找的到，所以把它貼出來。

TCL (Tool Command Language)，TCL念做"tickle"，TCL本身不支援物件導向，但是可以和其他物件導向語言結合。

顯示字串到console用puts

•  variable

•  comment

•  data type

•  Quotes and Curly braces

•  Control

•  switch

•  loop

•  proc

•  array
  　

variable

設定變數用set：

set varName? value?

set a 10 puts $a

事實上在Tcl中，沒有字串與數字的區分。也就是說：

        set Lab good

        set Lab “good”

這兩行指令會是一樣的結果。

　

comment

Tcl的注解必須以#開頭，而Tcl以換行(\n)和分號 (;)為命令的結束，所以如果想在命令後面做註解，就必須寫成 ;#。

puts "test only" ;# test only

　

data type

Tcl和shell script一樣並不需要是先宣告任何資料型態，其資料型態會隨其給的值變動。

　

Quotes and Curly braces

雙引號把引號內的文字串成字串，變數還是會被解譯(substitutions)。

set a "Hello World!"

　

"{", "}" curly braces，和雙引號一樣，只是變數不會被解釋。

set a "Hello World!" puts "$a" puts {$a}

　

"[", "]"就像shell中的`會把括號內的文字當成指令執行，而執行結果則會取代整個[]。

set x 5 set y 10 set z "$x + $y is [expr $x + $y]"

　

另外backslash "\"，會讓substitutions失效，如同其他language一樣，tcl也有提供Backslash Sequence。

String	Output
\b	Backspace
\f	clear screen
\n	New Line
\r	Carriage Return
\t	Tab
\v	Vertical Tab

　

Control

if  {expr1} {body1} elseif {expr2} {body2} else {body}

set x 1 if {$x == 2} { puts "$x is 2" } else { puts "$x is not 2" } if {$x != 1} { puts "$x is != 1" } else { puts "$x is 1" }

　

switch

Evaluate one of several scripts, depending on a given value

switch ?option? string {body}

% set x 1 1 % switch $x { 1 {puts "match 1"} 2 {puts "match 2"} default {puts "no match"} } ;# match 1 --> result

　

% set x 10 10 % switch $x { 1 {puts "match 1"} 2 {puts "match 2"} default {puts "no match"} } # no match ---> result % switch -regexp $x { 1 {puts "match 1"} 2 {puts "match 2"} default {puts "no match"} } # match 1 ---> result

　

loop

while {test} {body}

set x 0 while {$x < 5} { set x [expr $x + 1] if {$x > 7} break if "$x > 3" continue puts "x is $x" }

　

for {start} {test} {next} {body}

for {set x 1} {$x < 10} {incr x 2} { puts "x = $x" }

　

新增命令 -- procedure

TCL可以使用proc建立一個新的命令，其格式如下。

proc name { args }  {
     body
}

proc會建立一個名為name的命令，並且攜帶參數args，以及程式碼body。如果最後一個參數名稱為args，那就類似C的不定參數"..."。

範例：

proc sum {arg1 arg2} {     set x [expr {$arg1 + $arg2}];     return $x } proc printall {args} {     foreach j $args {         puts "$j"     } } proc x {a {b 2}} { #give default vaule for b     puts $a     puts $b }

　

Associative Array

associative array其實就是hash table，給一個Key(Tcl稱為element)會傳回一個value。其範例如下：

set A(1) "one" set A(2) "two" set A(Three) "three" array set B { 1 "one" 2 "two" 3 "three" } array names A foreach thing [array names A] { puts "$A($thing)" }

　

array set arrayName list

建立陣列，list 必須以 key value形式組成。

　

array size arrayName

傳回陣列大小。

　

array names arrayName ?mode? ?pattern?

 如果只有array names arrayName將會回傳所有的key，否則您也可以用正規表示式搜尋key是否存在。

　

array unset arrayName ?pattern?

如果沒有指明pattern，會將整個array註銷，否則會比對pattern和key是否相同，如果有會註銷該元素 (key)，否則會回傳空字串(empty string)。

　

array exists arrayName

如果陣列存在會回傳1，否則會回傳0。

　

array get arrayName ?pattern?

如果沒有指明pattern會將array整個以key value的形式傳回。如果有指明pattern則會搜尋是否有符合的key，有的話會一樣以key value傳回，否則傳回空字串。

　

array statistics arrayName

會將array的資訊顯示出來(distribution of data within the hash table)。

　

array startsearch arrayName

這是用來初始化搜尋的指令，會回傳search-ID，可用於array nextelement和array donesearch指令。

　

array nextelement arrayName searchId

傳回array的key。如果array被新增或刪除，則Tcl會自動呼叫array donesearch終止目前的搜尋。

　

array donesearch arrayName searchId

終止array的搜尋，並且註銷array的search-ID。

　

array anymore arrayName searchId

　

　

更多的tcl tutorial(tcl8.5)

　

學貴專精

今天看到一篇文章寫的不錯把他轉錄過來。

很久以前，有一個年輕人，立志要成為一個武林高手。於是就到了少林寺拜師，學了一年後，他覺得已經學好了少林武功，便離開了少林，急著要下山找人比武。在山下遇到了一個武當的弟子，打了幾回合後，他輸了。於是心裡面想著，好像是武當派比較厲害，便又到了武當學武。

過了一年，武當武功他又懂了點門道，心想我不會輸了，下山跟峨嵋派打，還是輸了……。就這樣過了好幾年，他覺得他什麼門派的武功都會了，但為什麼還是無法成為武林高手?

於是他對於人生絕望，走到河邊，要跳下去時，被過去教他少林武功的老和尚抓了一把。年輕人心酸的把他這幾年學武所受到的挫折一五一十的告訴老和尚。老和尚抓了抓他的鬍子，問年輕人說：「孩子，你這幾年學了這麼多武功，有沒有一種是你覺得綀起來最順手的呢?」 年輕人說：「有啊，每當我一使出少林棍法的時侯，就覺得特別有力道。
可是我心裡面想像的武林高手，應該是要精通各 門派的武功才能算是高手吧！」老和尚告訴他，既然你對於少林棍法特別有把握，那麼你就應該要忘了其它門派的武功，因為它並不適合你。

年輕人說：「可是我看別人在使他們自已門派的武功時，都好厲害。」只見老和尚笑了笑說：「如果真的有一個高手能將所有門派的武功都發揮到極致，那麼幾百年來，就不會有那麼多個門派立足了。
如果你想成為高手，就要把適合你的武功綀好，而不是天下的武功都想綀。」於是年輕人改變了他的想法，開始專注於綀他所熟悉的少林棍法。直到有一天，他成 為了少林的老和尚……

http://sites.google.com/site/tradersland/turtle-farm/trading-phycology

我的心得是：以前我常常覺得要學會很多，才叫做厲害，後來其實發現我們要學的是態度以及方法，執著的態度和做事情的方法，把一件事情最到最好，自然就會成為這個領域中的佼佼者。說到這個，又讓我想到樂天董事長說過一句話「每天改善1%，一年後強大37倍」。