diff options
author | Steve Bennett <steveb@workware.net.au> | 2011-11-27 23:01:50 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2011-11-28 13:13:42 +1000 |
commit | a730e83215ae7b15a3311afec79c5b4ce0700ed4 (patch) | |
tree | 01e6ce426a73f0c3e6380dc3cee037d18cf16e0d /stdlib.tcl | |
parent | ae8a6597a4220c44c14cd7e4214384926468a732 (diff) | |
download | jimtcl-a730e83215ae7b15a3311afec79c5b4ce0700ed4.zip jimtcl-a730e83215ae7b15a3311afec79c5b4ce0700ed4.tar.gz jimtcl-a730e83215ae7b15a3311afec79c5b4ce0700ed4.tar.bz2 |
Implement [alias] in C
And allow commands to set a temporary name for the purpose
of generating error messages
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'stdlib.tcl')
-rw-r--r-- | stdlib.tcl | 10 |
1 files changed, 0 insertions, 10 deletions
@@ -1,13 +1,3 @@ -# Create a single word alias (proc) for one or more words -# e.g. alias x info exists -# if {[x var]} ... -proc alias {name args} { - set prefix $args - proc $name args prefix { - tailcall {*}$prefix {*}$args - } -} - # Creates an anonymous procedure proc lambda {arglist args} { set name [ref {} function lambda.finalizer] |