summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2006-12-06 18:05:25 (GMT)
committerdgp <dgp@users.sourceforge.net>2006-12-06 18:05:25 (GMT)
commit1bd8d4fc6fdcdcd0ba535a3dc45b7670500acf83 (patch)
tree0e86d1914a1f1ef38a8ca255d4ad86ed37c3231c /tests
parent50620f98af568bb61c29bf2f7350cf455367813a (diff)
downloadtcl-1bd8d4fc6fdcdcd0ba535a3dc45b7670500acf83.zip
tcl-1bd8d4fc6fdcdcd0ba535a3dc45b7670500acf83.tar.gz
tcl-1bd8d4fc6fdcdcd0ba535a3dc45b7670500acf83.tar.bz2
* generic/tclCompCmds.c: Revised and consolidated into utility
* tests/mathop.c: routines some of routines that compile the new TIP 174 commands. This corrects some known bugs. More to come.
Diffstat (limited to 'tests')
-rw-r--r--tests/mathop.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/mathop.test b/tests/mathop.test
index 9ad66f6..4f10b48 100644
--- a/tests/mathop.test
+++ b/tests/mathop.test
@@ -9,7 +9,7 @@
# See the file "license.terms" for information on usage and redistribution of
# this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: mathop.test,v 1.1 2006/11/26 12:52:55 dkf Exp $
+# RCS: @(#) $Id: mathop.test,v 1.2 2006/12/06 18:05:27 dgp Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2.1
@@ -57,7 +57,7 @@ namespace eval ::testmathop {
list [catch {
+ [set x 0] [incr x] NaN [incr x] [error expected] [incr x]
} msg] $msg $x
- } -result {1 expected 2} -constraints knownBug
+ } -result {1 expected 2}
set op +
test mathop-1.19 {interpreted +} { $op } 0
test mathop-1.20 {interpreted +} { $op 1 } 1
@@ -132,7 +132,7 @@ namespace eval ::testmathop {
list [catch {
* [set x 0] [incr x] NaN [incr x] [error expected] [incr x]
} msg] $msg $x
- } -result {1 expected 2} -constraints knownBug
+ } -result {1 expected 2}
set op *
test mathop-2.19 {interpreted *} { $op } 1
test mathop-2.20 {interpreted *} { $op 2 } 2