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.
60 WORD p_0less, '0<',fasm
62 ;; flag is true (non-zero) if and only if n is less than zero.
67 WORD p_0equal, '0=',fasm
69 ;; flag is true if x is equal to zero otherwise false.
74 WORD p_lessthan, '<',fasm
76 ;; flag is true if and only if n1 is less than n2.
82 WORD p_lessequal, '<=',fasm
84 ;; flag is true if and only if n1 is less than n2.
90 WORD p_equal, '=',fasm
92 ;; flag is true if and only if x1 is bit-for-bit the same as
99 WORD p_unequal, '!=',fasm
101 ;; flag is true if and only if x1 is bit-for-bit the same as
108 WORD p_greaterthan, '>',fasm
110 ;; flag is true if and only if n1 is greater than n2.
116 WORD p_greaterequal, '>=',fasm
118 ;; flag is true if and only if n1 is greater than n2.