Changeset 2996
- Timestamp:
- Jun 1, 2012 8:33:29 PM (12 months ago)
- File:
-
- 1 edited
-
ofw/tokenizer/crosslis.fth (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
ofw/tokenizer/crosslis.fth
r1 r2996 141 141 : 2- 2 - ; 142 142 : <<a << ; 143 : */mod >r * r> /mod ; 144 : */ >r * r> / ; 143 \ These are not correct because the intermediate overflows. 144 \ If you need these functions, write them explicitly using um* and um/mod 145 \ : */mod >r * r> /mod ; 146 \ : */ >r * r> / ; 145 147 : xu>l ( ux -- ul ) drop ; \ 64 -> 32 146 148 : lu>x ( ul -- ux ) 0 ; \ 32 -> 64
Note: See TracChangeset
for help on using the changeset viewer.
