mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-07-09 14:07:34 +02:00
Disabling FFI integer overflow tests on 32-bit systems.
This commit is contained in:
parent
f1d66c582f
commit
8e4d4889c3
1 changed files with 24 additions and 22 deletions
|
@ -66,7 +66,9 @@ int sub(int x, int y) {
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; More detailed tests on integer conversions and overflow.
|
;; More detailed tests on integer conversions and overflow.
|
||||||
|
|
||||||
(test-ffi
|
(cond
|
||||||
|
((fixnum? (expt 2 60))
|
||||||
|
(test-ffi
|
||||||
"integers"
|
"integers"
|
||||||
(begin
|
(begin
|
||||||
(c-declare "
|
(c-declare "
|
||||||
|
@ -106,7 +108,7 @@ enum suuji tasu(enum suuji a, enum suuji b) {
|
||||||
(test #t (ponyo #f))
|
(test #t (ponyo #f))
|
||||||
;; int types
|
;; int types
|
||||||
(test 5 (tasu 2 3))
|
(test 5 (tasu 2 3))
|
||||||
)
|
)))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; String passing, returning and mutation.
|
;; String passing, returning and mutation.
|
||||||
|
|
Loading…
Add table
Reference in a new issue