(Theo:) |
: UMAX ( ux uy - uz ) 2DUP U< IF NIP EXIT THEN DROP ; 20000 40000 UMAX U. [rtn] 40000 ok |
Leo: | Gaat dit in alle Forth's zo? |
Theo: |
Ja, alleen de gebieden zijn soms anders. In een 32-bits Forth loopt SIGNED
van -2147483648 naar 2147483647 en UNSIGNED van 0 naar 4294967295
(ruim vier miljard).
Drie weken geleden sprak ik iemand met een Forth waarin 100 "groter" is dan 200 en 127+1 gelijk aan -128 is. Wat voor Forth zou dat geweest zijn? |