Tcl Source Code

Artifact [6dca36bc24]
Login

Artifact 6dca36bc24a7a32971e14e9f6037b6a1f5852847:

Attachment "exprtest.log" to ticket [584950ffff] added by mic42 2002-07-22 22:07:03.
expr.test

==== expr-22.1 non-numeric floats FAILED
==== Contents of test case:

    list [catch {expr {NaN + 1}} msg] $msg

---- Result was:
1 {syntax error in expression "NaN + 1": variable references require preceding $}
---- Result should have been (exact matching):
1 {domain error: argument not in valid range}
==== expr-22.1 FAILED


==== expr-22.2 non-numeric floats FAILED
==== Contents of test case:

    list [catch {expr {Inf + 1}} msg] $msg

---- Result was:
1 {syntax error in expression "Inf + 1": variable references require preceding $}
---- Result should have been (exact matching):
1 {can't use infinite floating-point value as operand of "+"}
==== expr-22.2 FAILED


==== expr-22.3 non-numeric floats FAILED
==== Contents of test case:

    set nan NaN
    list [catch {expr {$nan + 1}} msg] $msg

---- Result was:
1 {can't use non-numeric floating-point value as operand of "+"}
---- Result should have been (exact matching):
1 {domain error: argument not in valid range}
==== expr-22.3 FAILED


==== expr-22.5 non-numeric floats FAILED
==== Contents of test case:

    list [catch {expr NaN} msg] $msg

---- Result was:
1 {syntax error in expression "NaN": variable references require preceding $}
---- Result should have been (exact matching):
1 {domain error: argument not in valid range}
==== expr-22.5 FAILED


==== expr-22.6 non-numeric floats FAILED
==== Contents of test case:

    list [catch {expr Inf} msg] $msg

---- Result was:
1 {syntax error in expression "Inf": variable references require preceding $}
---- Result should have been (exact matching):
1 {floating-point value too large to represent}
==== expr-22.6 FAILED


==== expr-22.7 non-numeric floats FAILED
==== Contents of test case:

    list [catch {expr {1 / NaN}} msg] $msg

---- Result was:
1 {syntax error in expression "1 / NaN": variable references require preceding $}
---- Result should have been (exact matching):
1 {domain error: argument not in valid range}
==== expr-22.7 FAILED