diff options
| author | Marcelo Matus <mmatus@acms.arizona.edu> | 2005-10-18 13:24:15 +0000 |
|---|---|---|
| committer | Marcelo Matus <mmatus@acms.arizona.edu> | 2005-10-18 13:24:15 +0000 |
| commit | 7e5e4fd1f9c8adfcd0eb1328e35143e110e115ff (patch) | |
| tree | c9290832aaa1a42f5bcb6dd14ffaf82ed584ddca /Examples/test-suite/tcl/bools_runme.tcl | |
| parent | 5bbd841acc554b9e3d1ec33d604e825197ae6e0c (diff) | |
| download | swig-7e5e4fd1f9c8adfcd0eb1328e35143e110e115ff.tar.gz | |
massive typemap unification
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7676 626c5289-ae23-0410-ae9c-e8d60b6d4f22
Diffstat (limited to 'Examples/test-suite/tcl/bools_runme.tcl')
| -rw-r--r-- | Examples/test-suite/tcl/bools_runme.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Examples/test-suite/tcl/bools_runme.tcl b/Examples/test-suite/tcl/bools_runme.tcl index 92aeb99ec..582b8121f 100644 --- a/Examples/test-suite/tcl/bools_runme.tcl +++ b/Examples/test-suite/tcl/bools_runme.tcl @@ -35,7 +35,7 @@ if { [ value $const_pbool ] != $bool1} { exit 1 } -if { [ value $const_rbool ] != $bool2} { +if { $const_rbool != $bool2} { puts stderr "Runtime test 7 failed" exit 1 } @@ -61,7 +61,7 @@ if { [ value [ pbo $pbool ] ] != [ value $pbool ]} { exit 1 } -if { [ const_rbo [ value $const_rbool ] ] != [ value $const_rbool ]} { +if { [ const_rbo $const_rbool ] != $const_rbool } { puts stderr "Runtime test 12 failed" exit 1 } |