?? utils.exp
字號:
# utils.exp, a collection of Tcl/Expect utilities for texinfo tests.# ----------default--------------------------------------------# default VAR VALUE# Check whether VAR exists and has a nonempty value; # if not, use VALUE as the default# -------------------------------------------------------------proc default {varname varval} { upvar $varname outervar if { ![info exists outervar] || [string match {} $outervar] } then { verbose "Defaulting $varname to $varval\n" 1 set outervar $varval } else { verbose "$varname retains existing value $outervar\n" 1 } return }# ----------is_executable--------------------------------------# is_executable NAME# Boolean predicate: is NAME an executable file # somewhere on our PATH?# -------------------------------------------------------------proc is_executable {name} { if [ file executable [which $name] ] then { return 1 } else { return 0 }}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -