19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
# higher (e.g. the "eq" operator for [expr], etc).
#
if {![package vsatisfies [package provide Tcl] 8.4]} then {
error "need Tcl 8.4 or higher"
}
#
# NOTE: This script file uses features that are not available in Eagle (e.g.
# the "http" and "tls" packages).
#
if {[catch {package present Eagle}] == 0} then {
error "need native Tcl"
}
###############################################################################
|
|
|
|
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
# higher (e.g. the "eq" operator for [expr], etc).
#
if {![package vsatisfies [package provide Tcl] 8.4]} then {
error "need Tcl 8.4 or higher"
}
#
# NOTE: This script file uses features that are not available or not needed
# in Eagle (e.g. the "http" and "tls" packages, etc).
#
if {[catch {package present Eagle}] == 0} then {
error "need native Tcl"
}
###############################################################################
|