aboutsummaryrefslogtreecommitdiff
path: root/regtest.tcl
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2013-11-11 20:04:29 +1000
committerSteve Bennett <steveb@workware.net.au>2013-11-11 20:40:46 +1000
commit55f091203748c957eee7f36aeb6564aec495de00 (patch)
treeadd601e4de00f9c89a3290ad7bc856487f359fb6 /regtest.tcl
parent7430907e4db9a9bbdce8934bd4438987a616c8e1 (diff)
downloadjimtcl-55f091203748c957eee7f36aeb6564aec495de00.zip
jimtcl-55f091203748c957eee7f36aeb6564aec495de00.tar.gz
jimtcl-55f091203748c957eee7f36aeb6564aec495de00.tar.bz2
Add titles to recent regression tests
Reported-by: Sergei Gavrikov <sergei.gavrikov@gmail.com> Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'regtest.tcl')
-rw-r--r--regtest.tcl5
1 files changed, 5 insertions, 0 deletions
diff --git a/regtest.tcl b/regtest.tcl
index 65f16af..acda96e 100644
--- a/regtest.tcl
+++ b/regtest.tcl
@@ -1,3 +1,6 @@
+# These regression tests all provoked crashes at some point.
+# Thus they are kept separate from the regular test suite in tests/
+
# REGTEST 1
# 27Jan2005 - SIGSEGV for bug on Jim_DuplicateObj().
@@ -209,10 +212,12 @@ puts "TEST 28 PASSED"
set x [lindex {} 0]
info source $x
eval $x
+puts "TEST 29 PASSED"
# REGTEST 30
# non-UTF8 string tolower
string tolower "/mod/video/h\303\203\302\244xan_ witchcraft through the ages_20131101_0110.t"
+puts "TEST 30 PASSED"
# TAKE THE FOLLOWING puts AS LAST LINE