diff options
Diffstat (limited to 'tests')
132 files changed, 0 insertions, 270 deletions
diff --git a/tests/README b/tests/README index c9f5e3a..ce2382e 100644 --- a/tests/README +++ b/tests/README @@ -1,7 +1,5 @@ README -- Tcl test suite design document. -RCS: @(#) $Id: README,v 1.11.2.1 2003/04/01 21:13:07 dgp Exp $ - Contents: --------- diff --git a/tests/all.tcl b/tests/all.tcl index 3faa12a..db811a7 100644 --- a/tests/all.tcl +++ b/tests/all.tcl @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: all.tcl,v 1.16 2002/04/10 19:57:15 hobbs Exp $ set tcltestVersion [package require tcltest] namespace import -force tcltest::* diff --git a/tests/append.test b/tests/append.test index 1d82a99..6e70f8c 100644 --- a/tests/append.test +++ b/tests/append.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: append.test,v 1.7.12.2 2010/09/01 20:36:20 andreas_kupries Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/appendComp.test b/tests/appendComp.test index 8f7e3d4..f2a9ebf 100644 --- a/tests/appendComp.test +++ b/tests/appendComp.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: appendComp.test,v 1.5.4.2 2010/09/01 20:36:20 andreas_kupries Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/assocd.test b/tests/assocd.test index 34fb184..7bcf601 100644 --- a/tests/assocd.test +++ b/tests/assocd.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: assocd.test,v 1.5 2000/04/10 17:18:56 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/async.test b/tests/async.test index 307a707..b0582fc 100644 --- a/tests/async.test +++ b/tests/async.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: async.test,v 1.5 2000/04/10 17:18:56 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/autoMkindex.test b/tests/autoMkindex.test index a65a406..be1e3e6 100644 --- a/tests/autoMkindex.test +++ b/tests/autoMkindex.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: autoMkindex.test,v 1.14.2.1 2004/10/28 00:01:06 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/basic.test b/tests/basic.test index b267c16..e769a00 100644 --- a/tests/basic.test +++ b/tests/basic.test @@ -14,9 +14,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: basic.test,v 1.25.2.8 2007/06/27 17:29:24 dgp Exp $ -# package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/binary.test b/tests/binary.test index ed447f9..122fcdf 100644 --- a/tests/binary.test +++ b/tests/binary.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: binary.test,v 1.11.2.6 2008/06/20 16:49:10 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/case.test b/tests/case.test index 997cecb..f310113 100644 --- a/tests/case.test +++ b/tests/case.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: case.test,v 1.5 2000/04/10 17:18:57 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/clock.test b/tests/clock.test index c526771..a7476d2 100644 --- a/tests/clock.test +++ b/tests/clock.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: clock.test,v 1.22.2.7 2006/07/30 17:05:43 kennykb Exp $ set env(LC_TIME) POSIX diff --git a/tests/cmdAH.test b/tests/cmdAH.test index 646dd20..eb7d96a 100644 --- a/tests/cmdAH.test +++ b/tests/cmdAH.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: cmdAH.test,v 1.30.2.6 2006/10/01 13:17:34 patthoyts Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.1 diff --git a/tests/cmdIL.test b/tests/cmdIL.test index 2148dd1..1f0665a 100644 --- a/tests/cmdIL.test +++ b/tests/cmdIL.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: cmdIL.test,v 1.14.6.2 2007/03/10 14:57:38 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/cmdInfo.test b/tests/cmdInfo.test index 5f62444..611bba8 100644 --- a/tests/cmdInfo.test +++ b/tests/cmdInfo.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: cmdInfo.test,v 1.7 2002/06/22 04:19:47 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/cmdMZ.test b/tests/cmdMZ.test index 1e9a58a..b4e91c6 100644 --- a/tests/cmdMZ.test +++ b/tests/cmdMZ.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: cmdMZ.test,v 1.13.2.3 2004/02/25 23:38:16 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.1 diff --git a/tests/compExpr-old.test b/tests/compExpr-old.test index b7df34c..fc33a3d 100644 --- a/tests/compExpr-old.test +++ b/tests/compExpr-old.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: compExpr-old.test,v 1.7 2001/12/06 10:59:17 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/compExpr.test b/tests/compExpr.test index 0174800..e775b66 100644 --- a/tests/compExpr.test +++ b/tests/compExpr.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: compExpr.test,v 1.6.4.1 2008/04/17 19:47:35 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/compile.test b/tests/compile.test index 51dd3f6..9a5339c 100644 --- a/tests/compile.test +++ b/tests/compile.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: compile.test,v 1.24.2.5 2008/04/17 19:47:35 dgp Exp $ package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/concat.test b/tests/concat.test index 0debbd5..82a8965 100644 --- a/tests/concat.test +++ b/tests/concat.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: concat.test,v 1.5 2000/04/10 17:18:58 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/dcall.test b/tests/dcall.test index 83aaba1..4bbcfbe 100644 --- a/tests/dcall.test +++ b/tests/dcall.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: dcall.test,v 1.5 2000/04/10 17:18:58 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/dstring.test b/tests/dstring.test index 6c9276b..c1a0063 100644 --- a/tests/dstring.test +++ b/tests/dstring.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: dstring.test,v 1.5 2000/04/10 17:18:58 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/encoding.test b/tests/encoding.test index 22d5c9b..c4fa51d 100644 --- a/tests/encoding.test +++ b/tests/encoding.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: encoding.test,v 1.16.2.4 2009/11/16 17:03:29 ferrieux Exp $ package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/env.test b/tests/env.test index 3afa439..a4669d2 100644 --- a/tests/env.test +++ b/tests/env.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: env.test,v 1.17.2.5 2007/01/19 01:05:50 das Exp $ package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/error.test b/tests/error.test index 2175080..8aa99d6 100644 --- a/tests/error.test +++ b/tests/error.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: error.test,v 1.9.2.3 2006/01/11 17:29:46 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/eval.test b/tests/eval.test index 13fc501..97d5801 100644 --- a/tests/eval.test +++ b/tests/eval.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: eval.test,v 1.5 2000/04/10 17:18:58 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/event.test b/tests/event.test index 98e660d..d2e77db 100644 --- a/tests/event.test +++ b/tests/event.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: event.test,v 1.20.2.1 2006/11/28 16:29:47 kennykb Exp $ package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/exec.test b/tests/exec.test index b4d3216..8d36292 100644 --- a/tests/exec.test +++ b/tests/exec.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: exec.test,v 1.16.2.7 2006/01/16 19:31:19 rmax Exp $ package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/execute.test b/tests/execute.test index e0adda7..1a95c44 100644 --- a/tests/execute.test +++ b/tests/execute.test @@ -13,8 +13,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: execute.test,v 1.13.2.5 2009/06/13 14:38:44 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/expr-old.test b/tests/expr-old.test index 85e346a..3f29341 100644 --- a/tests/expr-old.test +++ b/tests/expr-old.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: expr-old.test,v 1.16.2.5 2006/05/04 12:34:39 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.1 diff --git a/tests/expr.test b/tests/expr.test index 03bb1bd..053b33a 100644 --- a/tests/expr.test +++ b/tests/expr.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: expr.test,v 1.17.2.13 2010/02/22 23:19:16 nijtmans Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/fCmd.test b/tests/fCmd.test index 170a155..eff2f80 100644 --- a/tests/fCmd.test +++ b/tests/fCmd.test @@ -9,9 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: fCmd.test,v 1.26.2.10 2009/11/10 22:32:39 patthoyts Exp $ -# if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/fileName.test b/tests/fileName.test index ab65964..6c80826 100644 --- a/tests/fileName.test +++ b/tests/fileName.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: fileName.test,v 1.30.2.17 2010/01/05 18:59:08 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/for-old.test b/tests/for-old.test index 3e142f3..5750ad0 100644 --- a/tests/for-old.test +++ b/tests/for-old.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: for-old.test,v 1.5 2000/04/10 17:18:59 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/for.test b/tests/for.test index 4fbeef7..c227994 100644 --- a/tests/for.test +++ b/tests/for.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: for.test,v 1.9 2001/12/06 10:59:18 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/foreach.test b/tests/foreach.test index a260576..f353ffd 100644 --- a/tests/foreach.test +++ b/tests/foreach.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: foreach.test,v 1.8.8.3 2007/03/13 16:26:33 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/format.test b/tests/format.test index 02af0d3..c440603 100644 --- a/tests/format.test +++ b/tests/format.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: format.test,v 1.11.2.8 2005/10/13 21:45:32 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/get.test b/tests/get.test index 4c3f679..d35c19b 100644 --- a/tests/get.test +++ b/tests/get.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: get.test,v 1.8 2002/11/19 02:34:50 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/history.test b/tests/history.test index c18ef53..898d009 100644 --- a/tests/history.test +++ b/tests/history.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: history.test,v 1.5 2000/04/10 17:18:59 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/http.test b/tests/http.test index a1df4ca..f8a79be 100644 --- a/tests/http.test +++ b/tests/http.test @@ -10,9 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# -# RCS: @(#) $Id: http.test,v 1.33.2.6 2006/10/06 19:00:53 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/httpd b/tests/httpd index 2bef362..3ea8024 100644 --- a/tests/httpd +++ b/tests/httpd @@ -6,8 +6,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# SCCS: @(#) httpd 1.2 98/02/20 14:51:59 #set httpLog 1 diff --git a/tests/httpold.test b/tests/httpold.test index 9dddbf2..b54a929 100644 --- a/tests/httpold.test +++ b/tests/httpold.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: httpold.test,v 1.11 2002/10/03 13:34:32 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/if-old.test b/tests/if-old.test index 8c85f0a..fbcf56c 100644 --- a/tests/if-old.test +++ b/tests/if-old.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: if-old.test,v 1.5.24.1 2003/03/27 13:11:12 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/if.test b/tests/if.test index 1c79ef2..e9da6d5 100644 --- a/tests/if.test +++ b/tests/if.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: if.test,v 1.7 2001/12/04 15:36:29 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/incr-old.test b/tests/incr-old.test index 566eafd..7068254 100644 --- a/tests/incr-old.test +++ b/tests/incr-old.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: incr-old.test,v 1.6.2.1 2003/03/27 13:11:13 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/incr.test b/tests/incr.test index 5f3a633..7ed9824 100644 --- a/tests/incr.test +++ b/tests/incr.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: incr.test,v 1.8 2003/02/07 01:07:05 mdejong Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/indexObj.test b/tests/indexObj.test index c72729f..6dd66b6 100644 --- a/tests/indexObj.test +++ b/tests/indexObj.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: indexObj.test,v 1.7.18.4 2006/04/06 18:57:30 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/info.test b/tests/info.test index c225127..11e475f 100644 --- a/tests/info.test +++ b/tests/info.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: info.test,v 1.24.2.14 2009/11/09 22:58:59 andreas_kupries Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/init.test b/tests/init.test index db97c35..79142c4 100644 --- a/tests/init.test +++ b/tests/init.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: init.test,v 1.9.2.2 2004/10/26 20:14:36 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/interp.test b/tests/interp.test index ff6e81e..ff38301 100644 --- a/tests/interp.test +++ b/tests/interp.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: interp.test,v 1.19.2.6 2004/10/28 00:01:07 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.1 diff --git a/tests/io.test b/tests/io.test index 9c94864..ed2619a 100644 --- a/tests/io.test +++ b/tests/io.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: io.test,v 1.40.2.24 2009/11/12 17:41:31 andreas_kupries Exp $ if {[catch {package require tcltest 2}]} { puts stderr "Skipping tests in [info script]. tcltest 2 required." diff --git a/tests/ioCmd.test b/tests/ioCmd.test index f4d45e4..2d17d76 100644 --- a/tests/ioCmd.test +++ b/tests/ioCmd.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: ioCmd.test,v 1.16.2.6 2008/04/15 18:31:04 andreas_kupries Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/ioUtil.test b/tests/ioUtil.test index 78df642..efdaef0 100644 --- a/tests/ioUtil.test +++ b/tests/ioUtil.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: ioUtil.test,v 1.13.2.2 2007/12/14 02:29:22 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/iogt.test b/tests/iogt.test index f64b49a..04da3eb 100644 --- a/tests/iogt.test +++ b/tests/iogt.test @@ -9,8 +9,6 @@ # Copyright (c) 2000 Ajuba Solutions. # Copyright (c) 2000 Andreas Kupries. # All rights reserved. -# -# RCS: @(#) $Id: iogt.test,v 1.7.2.1 2005/04/14 07:10:57 davygrvy Exp $ if {[catch {package require tcltest 2.1}]} { puts stderr "Skipping tests in [info script]. tcltest 2.1 required." diff --git a/tests/join.test b/tests/join.test index e464103..99b6eb5 100644 --- a/tests/join.test +++ b/tests/join.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: join.test,v 1.5 2000/04/10 17:19:01 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/lindex.test b/tests/lindex.test index ea52e91..1c04330 100644 --- a/tests/lindex.test +++ b/tests/lindex.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: lindex.test,v 1.10 2002/04/19 13:08:56 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/link.test b/tests/link.test index 765f4b9..672185c 100644 --- a/tests/link.test +++ b/tests/link.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: link.test,v 1.7 2002/06/22 04:19:47 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/linsert.test b/tests/linsert.test index b3dcb6b..7a1af4f 100644 --- a/tests/linsert.test +++ b/tests/linsert.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: linsert.test,v 1.8 2000/04/10 17:19:01 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/list.test b/tests/list.test index da61f10..6ab9e8a 100644 --- a/tests/list.test +++ b/tests/list.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: list.test,v 1.5.24.1 2003/03/27 13:11:15 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/listObj.test b/tests/listObj.test index a240dec..aa319bb 100644 --- a/tests/listObj.test +++ b/tests/listObj.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: listObj.test,v 1.5 2000/04/10 17:19:01 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/llength.test b/tests/llength.test index cfd788e..aee532d 100644 --- a/tests/llength.test +++ b/tests/llength.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: llength.test,v 1.5 2000/04/10 17:19:01 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/load.test b/tests/load.test index 3824d67..4794bd1 100644 --- a/tests/load.test +++ b/tests/load.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: load.test,v 1.11.2.2 2007/08/14 06:34:13 das Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/lrange.test b/tests/lrange.test index 68e5d5e..80523fb 100644 --- a/tests/lrange.test +++ b/tests/lrange.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: lrange.test,v 1.7 2000/04/10 17:19:01 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/lreplace.test b/tests/lreplace.test index d3ca611..5fc11a2 100644 --- a/tests/lreplace.test +++ b/tests/lreplace.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: lreplace.test,v 1.7 2000/04/10 17:19:01 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/lsearch.test b/tests/lsearch.test index 51d2176..a0899c4 100644 --- a/tests/lsearch.test +++ b/tests/lsearch.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: lsearch.test,v 1.10.2.4 2007/12/05 14:54:08 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/lset.test b/tests/lset.test index 6bf412f..e38f12f 100644 --- a/tests/lset.test +++ b/tests/lset.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id$ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/lsetComp.test b/tests/lsetComp.test index 6b9264c..f7b6cf7 100755 --- a/tests/lsetComp.test +++ b/tests/lsetComp.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id$ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/macFCmd.test b/tests/macFCmd.test index a6c7fa0..c35b793 100644 --- a/tests/macFCmd.test +++ b/tests/macFCmd.test @@ -9,9 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: macFCmd.test,v 1.10 2002/07/05 10:38:43 dkf Exp $ -# if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/main.test b/tests/main.test index 12afa46..40c0453 100644 --- a/tests/main.test +++ b/tests/main.test @@ -1,6 +1,4 @@ # This file contains a collection of tests for generic/tclMain.c. -# -# RCS: @(#) $Id: main.test,v 1.13.2.4 2006/09/04 21:36:55 dgp Exp $ if {[catch {package require tcltest 2.0.2}]} { puts stderr "Skipping tests in [info script]. tcltest 2.0.2 required." diff --git a/tests/misc.test b/tests/misc.test index d6536b7..9894e27 100644 --- a/tests/misc.test +++ b/tests/misc.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: misc.test,v 1.6 2003/02/16 01:36:32 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/msgcat.test b/tests/msgcat.test index b291a09..53b7c52 100644 --- a/tests/msgcat.test +++ b/tests/msgcat.test @@ -11,8 +11,6 @@ # # Note that after running these tests, entries will be left behind in the # message catalogs for locales foo, foo_BAR, and foo_BAR_baz. -# -# RCS: @(#) $Id: msgcat.test,v 1.11.2.4 2006/09/11 16:15:12 andreas_kupries Exp $ package require Tcl 8.2 if {[catch {package require tcltest 2}]} { diff --git a/tests/namespace-old.test b/tests/namespace-old.test index 5137051..5f394b5 100644 --- a/tests/namespace-old.test +++ b/tests/namespace-old.test @@ -13,8 +13,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: namespace-old.test,v 1.6 2001/04/07 02:11:19 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/namespace.test b/tests/namespace.test index e3d3ffe..166ff00 100644 --- a/tests/namespace.test +++ b/tests/namespace.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: namespace.test,v 1.21.2.10 2006/10/04 17:59:06 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/notify.test b/tests/notify.test index d85eba2..ba52c50 100755 --- a/tests/notify.test +++ b/tests/notify.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: notify.test,v 1.2.2.1 2003/10/06 13:55:38 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/obj.test b/tests/obj.test index 7b25f91..a6ed2d1 100644 --- a/tests/obj.test +++ b/tests/obj.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: obj.test,v 1.7.2.1 2004/09/10 21:52:37 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/opt.test b/tests/opt.test index 1ed075d..b3aba91 100644 --- a/tests/opt.test +++ b/tests/opt.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: opt.test,v 1.8 2000/07/18 21:30:41 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/osa.test b/tests/osa.test index 7a16ef1..0fc722c 100644 --- a/tests/osa.test +++ b/tests/osa.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: osa.test,v 1.6 2000/04/10 17:19:02 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/package.test b/tests/package.test index eb24e99..e5e8873 100644 --- a/tests/package.test +++ b/tests/package.test @@ -7,8 +7,6 @@ # # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. -# -# RCS: @(#) $Id: package.test,v 1.3 2000/04/10 17:19:02 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/parse.test b/tests/parse.test index 0932776..fa50679 100644 --- a/tests/parse.test +++ b/tests/parse.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: parse.test,v 1.11.2.5 2006/03/07 05:30:24 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/parseExpr.test b/tests/parseExpr.test index 0f6aa27..156a2cc 100644 --- a/tests/parseExpr.test +++ b/tests/parseExpr.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: parseExpr.test,v 1.10.2.1 2003/10/06 13:55:39 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/parseOld.test b/tests/parseOld.test index 6be1e59..27978e2 100644 --- a/tests/parseOld.test +++ b/tests/parseOld.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: parseOld.test,v 1.11.2.1 2003/03/27 13:49:22 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/pid.test b/tests/pid.test index 45c1278..d149df6 100644 --- a/tests/pid.test +++ b/tests/pid.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: pid.test,v 1.8.2.2 2004/02/25 23:38:17 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/pkg.test b/tests/pkg.test index c363e24..68d2a92 100644 --- a/tests/pkg.test +++ b/tests/pkg.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: pkg.test,v 1.9.12.11 2007/09/19 09:23:59 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/pkgMkIndex.test b/tests/pkgMkIndex.test index 985ba47..9f3b8fa 100644 --- a/tests/pkgMkIndex.test +++ b/tests/pkgMkIndex.test @@ -7,8 +7,6 @@ # # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. -# -# RCS: @(#) $Id: pkgMkIndex.test,v 1.23.2.1 2003/07/24 08:23:39 rmax Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/platform.test b/tests/platform.test index ce72211..d4816d2 100644 --- a/tests/platform.test +++ b/tests/platform.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/proc-old.test b/tests/proc-old.test index 680c89d..71558cf 100644 --- a/tests/proc-old.test +++ b/tests/proc-old.test @@ -13,8 +13,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: proc-old.test,v 1.9.2.1 2003/03/27 21:46:32 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/proc.test b/tests/proc.test index 8a9ec14..4e28554 100644 --- a/tests/proc.test +++ b/tests/proc.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: proc.test,v 1.11.2.2 2008/08/11 20:13:44 andreas_kupries Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/pwd.test b/tests/pwd.test index 8c39b4e..58612d9 100644 --- a/tests/pwd.test +++ b/tests/pwd.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: pwd.test,v 1.6 2000/04/10 17:19:03 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/reg.test b/tests/reg.test index d7b8c5f..4b09c06 100644 --- a/tests/reg.test +++ b/tests/reg.test @@ -8,8 +8,6 @@ # to read this file, ignoring the Tcl-isms.) # # Copyright (c) 1998, 1999 Henry Spencer. All rights reserved. -# -# RCS: @(#) $Id: reg.test,v 1.16.2.5 2008/05/26 21:46:44 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/regexp.test b/tests/regexp.test index c4c1c80..70ee47e 100644 --- a/tests/regexp.test +++ b/tests/regexp.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: regexp.test,v 1.22.2.4 2007/11/15 22:01:10 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/regexpComp.test b/tests/regexpComp.test index 6580d60..c8ad004 100644 --- a/tests/regexpComp.test +++ b/tests/regexpComp.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id$ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/registry.test b/tests/registry.test index 3639286..85b4f42 100644 --- a/tests/registry.test +++ b/tests/registry.test @@ -9,8 +9,6 @@ # # Copyright (c) 1997 by Sun Microsystems, Inc. All rights reserved. # Copyright (c) 1998-1999 by Scriptics Corporation. -# -# RCS: @(#) $Id: registry.test,v 1.12.2.4 2009/11/10 22:32:39 patthoyts Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/remote.tcl b/tests/remote.tcl index 005f2df..4ac3607 100644 --- a/tests/remote.tcl +++ b/tests/remote.tcl @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: remote.tcl,v 1.3 1999/04/16 00:47:33 stanton Exp $ # Initialize message delimitor diff --git a/tests/rename.test b/tests/rename.test index babe4ef..aa5f900 100644 --- a/tests/rename.test +++ b/tests/rename.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: rename.test,v 1.10 2001/09/12 20:28:50 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/resource.test b/tests/resource.test index ba6a403..3ae24e2 100644 --- a/tests/resource.test +++ b/tests/resource.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: resource.test,v 1.7.24.1 2003/10/06 14:30:06 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/result.test b/tests/result.test index cf46eb9..0e61575 100644 --- a/tests/result.test +++ b/tests/result.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# SCCS: @(#) result.test 1.4 97/12/08 15:07:49 if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/safe.test b/tests/safe.test index 938e247..a3def0a 100644 --- a/tests/safe.test +++ b/tests/safe.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: safe.test,v 1.13.2.3 2006/11/28 22:20:03 andreas_kupries Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/scan.test b/tests/scan.test index 173edb1..0a70b0f 100644 --- a/tests/scan.test +++ b/tests/scan.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: scan.test,v 1.14.2.1 2004/08/19 21:12:04 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/security.test b/tests/security.test index 79baeac..26e7ec8 100644 --- a/tests/security.test +++ b/tests/security.test @@ -9,8 +9,6 @@ # Copyright (c) 1997 Sun Microsystems, Inc. # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. -# -# RCS: @(#) $Id: security.test,v 1.5 2000/04/10 17:19:04 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/set-old.test b/tests/set-old.test index c798990..29e0002 100644 --- a/tests/set-old.test +++ b/tests/set-old.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: set-old.test,v 1.16.2.1 2003/03/27 21:46:32 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/set.test b/tests/set.test index 47a90d7..8bfa9d2 100644 --- a/tests/set.test +++ b/tests/set.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: set.test,v 1.8 2000/04/10 17:19:04 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/socket.test b/tests/socket.test index 9a53b35..96b81b8 100644 --- a/tests/socket.test +++ b/tests/socket.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: socket.test,v 1.26.2.6 2006/03/16 00:35:59 andreas_kupries Exp $ # Running socket tests with a remote server: # ------------------------------------------ diff --git a/tests/source.test b/tests/source.test index 6417af7..3a1454c 100644 --- a/tests/source.test +++ b/tests/source.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: source.test,v 1.8.2.2 2004/02/25 23:38:17 dgp Exp $ if {[catch {package require tcltest 2.1}]} { puts stderr "Skipping tests in [info script]. tcltest 2.1 required." diff --git a/tests/split.test b/tests/split.test index 0ad879b..5e168dd 100644 --- a/tests/split.test +++ b/tests/split.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: split.test,v 1.8 2002/11/12 02:25:24 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/stack.test b/tests/stack.test index f5d849b..e029bbd 100644 --- a/tests/stack.test +++ b/tests/stack.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: stack.test,v 1.15.2.1 2004/05/03 18:01:36 kennykb Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/string.test b/tests/string.test index 8bd2dfa..0ec65ff 100644 --- a/tests/string.test +++ b/tests/string.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: string.test,v 1.36.2.7 2006/01/23 12:11:15 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/stringComp.test b/tests/stringComp.test index 30a89db..3c13581 100644 --- a/tests/stringComp.test +++ b/tests/stringComp.test @@ -14,8 +14,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: stringComp.test,v 1.6.2.1 2004/10/28 00:01:12 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/stringObj.test b/tests/stringObj.test index 942645e..991b256 100644 --- a/tests/stringObj.test +++ b/tests/stringObj.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: stringObj.test,v 1.15.2.2 2009/03/30 17:47:09 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/subst.test b/tests/subst.test index 09e4de2..77a3df7 100644 --- a/tests/subst.test +++ b/tests/subst.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: subst.test,v 1.13.2.7 2004/10/26 21:42:53 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/switch.test b/tests/switch.test index f1ae7c7..007456f 100644 --- a/tests/switch.test +++ b/tests/switch.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: switch.test,v 1.7 2001/11/27 13:30:54 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/tcltest.test b/tests/tcltest.test index eabc39a..97a2863 100755 --- a/tests/tcltest.test +++ b/tests/tcltest.test @@ -5,8 +5,6 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # Copyright (c) 2000 by Ajuba Solutions # All rights reserved. -# -# RCS: @(#) $Id: tcltest.test,v 1.37.2.12 2009/11/10 22:32:39 patthoyts Exp $ # Note that there are several places where the value of # tcltest::currentFailure is stored/reset in the -setup/-cleanup diff --git a/tests/thread.test b/tests/thread.test index 037766d..0edddd2 100644 --- a/tests/thread.test +++ b/tests/thread.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: thread.test,v 1.10.18.1 2009/10/18 11:15:10 mistachkin Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/timer.test b/tests/timer.test index cf0e312..3dd140e 100644 --- a/tests/timer.test +++ b/tests/timer.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: timer.test,v 1.7.22.2 2005/11/09 21:46:20 kennykb Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/trace.test b/tests/trace.test index 362a505..1555d63 100644 --- a/tests/trace.test +++ b/tests/trace.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: trace.test,v 1.26.2.18 2007/08/14 15:15:39 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/unixFCmd.test b/tests/unixFCmd.test index 8f47c62..fcb5e69 100644 --- a/tests/unixFCmd.test +++ b/tests/unixFCmd.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: unixFCmd.test,v 1.17.2.1 2003/04/14 15:45:57 vincentdarley Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/unixFile.test b/tests/unixFile.test index cc3b9b4..14fc533 100644 --- a/tests/unixFile.test +++ b/tests/unixFile.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: unixFile.test,v 1.7 2002/07/05 10:38:43 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/unixInit.test b/tests/unixInit.test index f4a2fc7..a4a9249 100644 --- a/tests/unixInit.test +++ b/tests/unixInit.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: unixInit.test,v 1.30.2.12 2005/04/27 21:07:52 dgp Exp $ package require tcltest 2 namespace import -force ::tcltest::* diff --git a/tests/unixNotfy.test b/tests/unixNotfy.test index c75c745..8308055 100644 --- a/tests/unixNotfy.test +++ b/tests/unixNotfy.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: unixNotfy.test,v 1.11.2.4 2005/05/14 20:52:31 das Exp $ # The tests should not be run if you have a notifier which is unable to # detect infinite vwaits, as the tests below will hang. The presence of diff --git a/tests/unknown.test b/tests/unknown.test index 5573b81..6e95a2b 100644 --- a/tests/unknown.test +++ b/tests/unknown.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: unknown.test,v 1.6 2000/04/10 17:19:05 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/uplevel.test b/tests/uplevel.test index d21e637..4670369 100644 --- a/tests/uplevel.test +++ b/tests/uplevel.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: uplevel.test,v 1.7 2002/08/08 18:19:37 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/upvar.test b/tests/upvar.test index ad8fe6c..1301338 100644 --- a/tests/upvar.test +++ b/tests/upvar.test @@ -10,8 +10,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: upvar.test,v 1.7 2000/04/10 17:19:05 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/utf.test b/tests/utf.test index b01d81d..63be814 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -7,8 +7,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: utf.test,v 1.8.14.6 2010/10/23 14:41:23 nijtmans Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 diff --git a/tests/util.test b/tests/util.test index b71906d..da42f61 100644 --- a/tests/util.test +++ b/tests/util.test @@ -6,8 +6,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: util.test,v 1.10.4.4 2005/10/28 03:26:33 mdejong Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/var.test b/tests/var.test index 9f163e8..af3d22c 100644 --- a/tests/var.test +++ b/tests/var.test @@ -13,9 +13,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: var.test,v 1.20.2.4 2007/03/13 15:59:53 dgp Exp $ -# if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.2 diff --git a/tests/while-old.test b/tests/while-old.test index 1ea7641..980b9d4 100644 --- a/tests/while-old.test +++ b/tests/while-old.test @@ -12,8 +12,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: while-old.test,v 1.6 2000/04/10 17:19:06 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/while.test b/tests/while.test index 2fb396f..bf86419 100644 --- a/tests/while.test +++ b/tests/while.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: while.test,v 1.8 2001/12/04 15:36:29 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/winConsole.test b/tests/winConsole.test index 81ddb54..a8a664c 100644 --- a/tests/winConsole.test +++ b/tests/winConsole.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winConsole.test,v 1.5 2000/04/10 17:19:06 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/winDde.test b/tests/winDde.test index 699ffb6..85fb5a6 100644 --- a/tests/winDde.test +++ b/tests/winDde.test @@ -8,8 +8,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winDde.test,v 1.13.2.2 2005/06/21 22:59:03 patthoyts Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/winFCmd.test b/tests/winFCmd.test index d566b63..6461693 100644 --- a/tests/winFCmd.test +++ b/tests/winFCmd.test @@ -9,9 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winFCmd.test,v 1.20.2.10 2009/11/10 22:32:39 patthoyts Exp $ -# if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/winFile.test b/tests/winFile.test index 95816ff..756144e 100644 --- a/tests/winFile.test +++ b/tests/winFile.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winFile.test,v 1.9.2.1 2003/04/14 15:45:58 vincentdarley Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/winNotify.test b/tests/winNotify.test index ea066e7..c237bd3 100644 --- a/tests/winNotify.test +++ b/tests/winNotify.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winNotify.test,v 1.7 2000/04/10 17:19:06 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest diff --git a/tests/winPipe.test b/tests/winPipe.test index c67132b..e2687ea 100644 --- a/tests/winPipe.test +++ b/tests/winPipe.test @@ -11,8 +11,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winPipe.test,v 1.22.2.4 2005/04/20 00:14:54 hobbs Exp $ package require tcltest namespace import -force ::tcltest::* diff --git a/tests/winTime.test b/tests/winTime.test index ea663e5..9ce6b12 100644 --- a/tests/winTime.test +++ b/tests/winTime.test @@ -9,8 +9,6 @@ # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -# -# RCS: @(#) $Id: winTime.test,v 1.8.2.1 2003/04/12 20:11:34 kennykb Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest |