diff options
| author | Steve Bennett <steveb@workware.net.au> | 2011-06-22 15:43:06 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2011-07-07 21:34:34 +1000 |
| commit | e6eebd6b8822ce954a864cb3b02799b53ec7fec3 (patch) | |
| tree | 6c879ec23423ec7a874d9d427da394184bc2b104 /regtest.tcl | |
| parent | c9e7972f4149bff92c53d26fa408370cac6f39be (diff) | |
| download | jimtcl-e6eebd6b8822ce954a864cb3b02799b53ec7fec3.zip jimtcl-e6eebd6b8822ce954a864cb3b02799b53ec7fec3.tar.gz jimtcl-e6eebd6b8822ce954a864cb3b02799b53ec7fec3.tar.bz2 | |
Use clock instead of open for loadable module bug
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'regtest.tcl')
| -rw-r--r-- | regtest.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/regtest.tcl b/regtest.tcl index 7561a60..66c20ca 100644 --- a/regtest.tcl +++ b/regtest.tcl @@ -58,9 +58,10 @@ string toupper [list a] puts "TEST 8 PASSED" # REGTEST 9 -# 04Nov2008 - crash on exit when replacing Tcl proc with C command. Requires the aio extension -proc open {args} {} -catch {package require aio} +# 04Nov2008 - crash on exit when replacing Tcl proc with C command. +# Requires the clock extension to be built as a loadable module. +proc clock {args} {} +catch {package require clock} # Note, crash on exit, so don't say we passed! # REGTEST 10 |