# New Ticket Created by Ron Blaschke # Please include the string: [perl #38887] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=38887 >
.sub main # produce INFINITY (is there a constant for that?) set N0, 0.0 ln N1, N0 print N1 print "\n" # produce NAN (is there a constant for that?) set N0, -1.0 sqrt N1, N0 print N1 print "\n" .end On Windows with Visual C++ 8.0 above code prints >parrot test.pir -1.#INF00 -1.#IND00 On UNIXish platforms it's probably "-inf" and "-nan". That's why F<t/pmc/complex.t> currently fails on Windows: It expects "-inf" on stringification. t\pmc\complex....ok 13/50 t\pmc\complex....NOK 30# Failed test (t\pmc\complex.t at line 997) # got: ' # ln(0+0i) # got -1.#INF00+0.000000i # not -inf+0.000000i # done # ' # expected: 'done # ' t\pmc\complex....ok 50/50# Looks like you failed 1 test of 50. t\pmc\complex....dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test 30 Failed 1/50 tests, 98.00% okay (less 3 skipped tests: 46 okay, 92.00%) Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t\pmc\complex.t 1 256 50 1 2.00% 30 3 subtests skipped. Failed 1/1 test scripts, 0.00% okay. 1/50 subtests failed, 98.00% okay.