~ chicken-core (chicken-5) eb9c5c6a07e423381f56c38b1756127370555d3c
commit eb9c5c6a07e423381f56c38b1756127370555d3c Author: felix <felix@call-with-current-continuation.org> AuthorDate: Sat Dec 29 23:04:44 2012 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Sat Dec 29 23:04:44 2012 +0100 disable integer64 test on 32-bit platforms diff --git a/tests/compiler-tests.scm b/tests/compiler-tests.scm index c858042c..4c26dc72 100644 --- a/tests/compiler-tests.scm +++ b/tests/compiler-tests.scm @@ -235,6 +235,7 @@ (string->number "179769313486231570814527423731704356798070567525844996598917476803157260780028538760589558632766878171540458953514382464234321326889464182768467546703537516986049910576551282076245490090389328944075868508455133942304583236903222948165808559332123348274797826204144723168738177180919299881250404026184124858368.0"))) ;; #955: unsigned-integer64 arg returned magnitude instead of Scheme object. +#+64bit (assert (= #xAB54A98CEB1F0AD2 ((foreign-lambda* unsigned-integer64 ((unsigned-integer64 x)) "C_return(x);")Trap