( u --- )

"u-dot". Type the value of the unsigned number on the top of the stack to the terminal.

( u1 u2 --- tf)

"u-less-than". Perform an unsigned compare of the two unsigned numbers on the top of the stack. Leave TRUE or FALSE on the stack. (u1<u2).

99000 99900 u<will return TRUE on the stack.

( u1 u2 --- tf)

"u-greater-than". Perform an unsigned compare of the two unsigned numbers on the top of the stack. Return TRUE if u1 is greater than u2. Else, return FALSE. (u1>u2).

99000 99900 u>will return FALSE.

( d1 u1 --- d1*u1 )

"u-m-star". Unsigned mixed length multiply. This is a 32-bit multiply in Until.

( d1 u2 --- rem quot )

"u-m slash mod". Unsigned multiple length division. (d1/u2)

( --- )

"unseal". Converts a sealed Until source file into 'ASCII' form for reference. It allows sealed Until applications to be examined for debugging.

unseal calc.bin

( tf --- )

"until". Terminate a

: aword begin some_words until ;