5 ;; x3 is the bit-by-bit logical "and" of x1 with x2.
12 ;; x3 is the bit-by-bit inclusive-or of x1 with x2.
17 WORD p_xor, 'XOR',fasm
19 ;; x3 is the bit-by-bit exclusive-or of x1 with x2.
24 WORD p_not, 'NOT',fasm
26 ;; v = 0 if x is non-zero and -1 otherwise
30 WORD p_false, 'FALSE',fasm
32 ;; Push a false flag, 0.
36 WORD p_true, 'TRUE',fasm
38 ;; Return a true flag, -1. (non-zero)
42 WORD p_within, 'WITHIN',fasm
43 ;; ( n1 n2 n3 -- flag )
44 ;; Push true if n2 <= n1 and n1 < n3 and false otherwise.
56 WORD p_0less, '0<',fasm
58 ;; flag is true (non-zero) if and only if n is less than zero.
66 WORD p_0equal, '0=',fasm
68 ;; flag is true if x is equal to zero otherwise false.
76 WORD p_lessthan, '<',fasm
78 ;; flag is true if and only if n1 is less than n2.
88 WORD p_equal, '=',fasm
90 ;; flag is true if and only if x1 is bit-for-bit the same as
101 WORD p_greaterthan, '>',fasm
103 ;; flag is true if and only if n1 is greater than n2.