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',dovalue
32 ;; Push a false flag, 0.
35 WORD p_true, 'TRUE',dovalue
37 ;; Return a true flag, -1. (non-zero)
48 WORD p_within, 'WITHIN',fasm
49 ;; ( n1 n2 n3 -- flag )
50 ;; Push true if n2 <= n1 and n1 < n3 and false otherwise.
62 WORD p_0less, '0<',fasm
64 ;; flag is true (non-zero) if and only if n is less than zero.
70 WORD p_0equal, '0=',fasm
72 ;; flag is true if x is equal to zero otherwise false.
77 WORD p_lessthan, '<',fasm
79 ;; flag is true if and only if n1 is less than n2.
85 WORD p_lessequal, '<=',fasm
87 ;; flag is true if and only if n1 is less than n2.
93 WORD p_equal, '=',fasm
95 ;; flag is true if and only if x1 is bit-for-bit the same as
102 WORD p_unequal, '!=',fasm
104 ;; flag is true if and only if x1 is bit-for-bit the same as
111 WORD p_greaterthan, '>',fasm
113 ;; flag is true if and only if n1 is greater than n2.
119 WORD p_greaterequal, '>=',fasm
121 ;; flag is true if and only if n1 is greater than n2.