diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/opt.test | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/tests/opt.test b/tests/opt.test index a7e0a11..1ed075d 100644 --- a/tests/opt.test +++ b/tests/opt.test @@ -11,7 +11,7 @@ # 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.7 2000/05/10 23:49:48 hobbs Exp $ +# RCS: @(#) $Id: opt.test,v 1.8 2000/07/18 21:30:41 ericm Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -137,17 +137,6 @@ test opt-8.7 {List utilities} { set l } {a {b c -2 e} f} -test opt-8.8 {List utilities} { - set l {{b c 7 e} f} - ::tcl::Lfirst $l -} {b c 7 e} - - -test opt-8.9 {List utilities} { - set l {a {b c 7 e} f} - ::tcl::Lrest $l -} {{b c 7 e} f} - test opt-8.10 {List utilities} { set l {a {b c 7 e} f} ::tcl::Lvarpop l |