compile fix

db4
Joe Groff 2009-08-13 13:39:48 -04:00
parent 92ac48a5bc
commit 6102f6eba4
1 changed files with 2 additions and 2 deletions

View File

@ -52,11 +52,11 @@ SYMBOLS: long ulong long-bits ;
[
\ long integer [ HEX: -8000,0000,0000,0000 HEX: 7fff,ffff,ffff,ffff between? ] define-predicate-class
\ ulong integer [ HEX: 0 HEX: ffff,ffff,ffff,ffff between? ] define-predicate-class
64 long-bits set-global
64 \ long-bits set-global
] [
\ long integer [ HEX: -8000,0000 HEX: 7fff,ffff between? ] define-predicate-class
\ ulong integer [ HEX: 0 HEX: ffff,ffff between? ] define-predicate-class
32 long-bits set-global
32 \ long-bits set-global
] if
>>