diff options
| author | Steve Bennett <steveb@workware.net.au> | 2010-03-03 16:00:33 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2010-10-15 11:02:48 +1000 |
| commit | b83beb2febcbe0abcf338e3f915b43889ce93eca (patch) | |
| tree | 8baa5d1ff957f3209ac40a3d89d5fa5644796398 /tests/proc.test | |
| parent | 80ddfb1fe799cde11aa65fcea5935686aacb4ca4 (diff) | |
| download | jimtcl-b83beb2febcbe0abcf338e3f915b43889ce93eca.zip jimtcl-b83beb2febcbe0abcf338e3f915b43889ce93eca.tar.gz jimtcl-b83beb2febcbe0abcf338e3f915b43889ce93eca.tar.bz2 | |
Move some core procs into the (Tcl) stdlib extension
Also implement 'local' to declare/delete local procs
* Add tests/alias.test for testing alias, current, local
* proc now returns the name of the proc created
* Add helper 'function' to stdlib
Reimplement glob and case to use local procs
* This keeps these internal procs out of the global namespace
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/proc.test')
| -rw-r--r-- | tests/proc.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/proc.test b/tests/proc.test index 56ed59a..985f68b 100644 --- a/tests/proc.test +++ b/tests/proc.test @@ -30,7 +30,7 @@ proc tproc x { test proc-old-1.2 {simple procedure call and return} {tproc 2} 3 test proc-old-1.3 {simple procedure call and return} { proc tproc {} {return foo} -} {} +} {tproc} test proc-old-1.4 {simple procedure call and return} { proc tproc {} {return} tproc |