- ; really dirty trick to avoid the bug truncate/unsigned vop
- ; followed by move-from/word->fixnum where the result from
- ; the truncate is 0xe39516a7 and move-from-word will treat
- ; the unsigned high number as an negative number.
- ; instead we clear the high bit in the input to truncate.
+ ;; really dirty trick to avoid the bug truncate/unsigned vop
+ ;; followed by move-from/word->fixnum where the result from
+ ;; the truncate is 0xe39516a7 and move-from-word will treat
+ ;; the unsigned high number as an negative number.
+ ;; instead we clear the high bit in the input to truncate.