Changeset 13906 in project for chicken


Ignore:
Timestamp:
03/24/09 22:44:44 (11 years ago)
Author:
felix winkelmann
Message:

lolevel test assumes 4-byte wordsize

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/tests/lolevel-tests.scm

    r13780 r13906  
    170170(assert (= 4 (number-of-bytes "abcd")))
    171171
    172 (assert (= 4 (number-of-bytes '#(1))))
     172(assert (= (if (##sys#fudge 3) 8 4) (number-of-bytes '#(1))))
    173173
    174174; make-record-instance
Note: See TracChangeset for help on using the changeset viewer.