diff options
Diffstat (limited to 'contrib/bluegnu2.0.3/testsuite/T/test_002.exp')
| -rw-r--r-- | contrib/bluegnu2.0.3/testsuite/T/test_002.exp | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/contrib/bluegnu2.0.3/testsuite/T/test_002.exp b/contrib/bluegnu2.0.3/testsuite/T/test_002.exp deleted file mode 100644 index e1a185a..0000000 --- a/contrib/bluegnu2.0.3/testsuite/T/test_002.exp +++ /dev/null @@ -1,22 +0,0 @@ - -verbose "Test test_002.exp: level [info level]" -verbose "szTestName: [set szTestName]" -verbose "lTestName : $lTestName" -pass -namespace ::Common { - if [info exists i] { - if {[expr $i % 2]} { - verbose " Remainder is 1 >$i<" - incr i - pass "karel" - return - } else { - verbose " Zero remainder >$i<" - fail "pieter" - incr i - } - verbose " === End: $env(SHELL)" - } else { - verbose "#### i doesn't exists" - } -} |