Merge commit '40a723a92236fe4e58feb89057b4182b1fc76810'
[bpt/guile.git] / test-suite / vm / t-literal-integers.scm
1 ;; Check whether literal integers are correctly signed.
2
3 (and (= 4294967295 (- (expt 2 32) 1)) ;; unsigned
4 (= -2147483648 (- (expt 2 31))) ;; signed
5 (= 2147483648 (expt 2 31))) ;; unsigned