Posted to tcl by dbohdan at Tue May 19 16:50:07 GMT 2015view pretty
#!/usr/bin/env jimsh
proc ::ns::blah {a b} {
return [+ $a $b]
}
proc ::ns args {
::ns::[lindex $args 0] {*}[lrange $args 1 end]
}
puts [::ns blah 1 2]
#!/usr/bin/env jimsh
proc ::ns::blah {a b} {
return [+ $a $b]
}
proc ::ns args {
::ns::[lindex $args 0] {*}[lrange $args 1 end]
}
puts [::ns blah 1 2]