diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-10 11:56:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-10 11:56:23 (GMT) |
| commit | 13347d984e68e94063bee8fe1b5c8cc77ef5b250 (patch) | |
| tree | 556090915c1e4fb7420fa462964788c31d0852d9 /tests/expr-old.test | |
| parent | 5137357e74c887368ad68c3cb09998b154e68d4f (diff) | |
| download | tcl-13347d984e68e94063bee8fe1b5c8cc77ef5b250.zip tcl-13347d984e68e94063bee8fe1b5c8cc77ef5b250.tar.gz tcl-13347d984e68e94063bee8fe1b5c8cc77ef5b250.tar.bz2 | |
Eliminate exess spacings in many test-cases
Diffstat (limited to 'tests/expr-old.test')
| -rw-r--r-- | tests/expr-old.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/expr-old.test b/tests/expr-old.test index 06a00ba..3adfb63 100644 --- a/tests/expr-old.test +++ b/tests/expr-old.test @@ -420,13 +420,13 @@ test expr-old-21.3 {parenthesization} {expr +(3-4)} -1 # Embedded commands and variable names. -set a 16 -test expr-old-22.1 {embedded variables} {expr {2*$a}} 32 +set a 16 +test expr-old-22.1 {embedded variables} {expr {2*$a}} 32 test expr-old-22.2 {embedded variables} { set x -5 set y 10 expr {$x + $y} -} {5} +} {5} test expr-old-22.3 {embedded variables} { set x " -5" set y " +10" @@ -1120,7 +1120,7 @@ test expr-old-37.25 {Tcl_ExprDouble and NaN} \ {ieeeFloatingPoint testexprdouble} { list [catch {testexprdouble 0.0/0.0} result] $result } {1 {domain error: argument not in valid range}} - + test expr-old-38.1 {Verify Tcl_ExprString's basic operation} -constraints {testexprstring} -body { list [testexprstring "1+4"] [testexprstring "2*3+4.2"] \ [catch {testexprstring "1+"} msg] $msg |