(Theo:) |
: UMAX ( ux uy - uz ) 2DUP U< IF NIP EXIT THEN DROP ; 20000 40000 UMAX U. [rtn] 40000 ok |
Leo: | Geht das in allen Forth-Systemen so? |
Theo: |
Ja, nur sind die Bereiche manchmal anders.
In einem 32-bit-Forth läuft SIGNED von -2147483648 bis 2147483647
und UNSIGNED von 0 bis 4294967295 (ungefähr vier Milliarden).
Vor drei Wochen sprach ich mit jemandem, der mit einem Forth arbeitet, in welchem 100 größer als 200 ist und 127 plus 1 den Wert -128 ergibt. Was für ein Forth wird das wohl gewesen sein? |