proc

proc 命令建立一個叫做name 的新的 Tcl 過程，替換已經叫這個名字的任何現存的命令或過程。當呼叫這個新命令的時候，Tcl 直譯器將執行 body 的內容。通常， name 是未限定的(unqualified)(不包括任何包含(這個過程)的名字空間的名字)，在當前名字空間中建立這個新過程。如果 name 包含任何名字空間限定符(qualifier)，則在指定的名字空間中建立這個過程。 Args 指定給這個過程的形式引數。它由一個列表組成，可以為空，它的每個元素指定一個引數。每個引數指定符(specifier)也可以是有一個或兩個欄位(field)的一個列表。如果在指定符中只有一個單一欄位則它是引數的名字；如果有兩個欄位，則第一個是引數名而第二個是它的預設值。

在呼叫 name 時，為過程的每個形式引數建立一個區域性變數；它的值將是在呼叫命令中相應的(實際)引數的值或這個引數的預設值。在過程呼叫中可以不指定有預設值的引數。但是，必須有足夠的實際引數給所有沒有預設值的形式引數，並且沒有多餘的實際引數。有一種特殊情況可以允許過程有可變數目的引數。如果最後的形式引數的名字是 args，則到這個過程的一個呼叫包含的實際引數可以多於過程擁有的形式引數。此時，把開始於應當被賦給 args 的那個實際引數的所有實際引數組合成一個列表(有如使用了 list 命令)；把這個組合後的值賦給區域性變數 args。

在執行 body 的時候，變數名一般引用區域性變數，在被引用時自動建立它們，在過程退出時(自動)刪除它們。為過程的每個引數自動的建立一個區域性變數。只能透過呼叫 global 命令或 upvar 命令來訪問全域性變數。只能透過呼叫 variable 命令或 upvar 命令來訪問名字空間變數。

proc 命令返回一個空串。在呼叫一個過程的時候，在一個 return 命令中指定這個過程的返回值。如果過程不執行一個顯式的 return 命令，則它的返回值是在過程體中執行的最後一條命令的值。如果在執行過程體期間發生了一個錯誤，則作為一個整體的過程將返回相同的錯誤。