Integer and Bit-Wise Operations

Following functions request arguments to be integers.

  mod dividend divisor [function]

• returns remainder when dividend is divided by divisor. (mod 6 5)=1, (mod -6 5)=-1, (mod 6 -5)=1, (mod -6 -5)=-1.

  1- integer [function]

• The compiler assumes the argument to be an integer. integer-1 is returned.

  1+ integer [function]

• Arguments to 1+ and 1- must be an integer. integer+1 is returned.

  logand &rest integers [function]

• bitwise-and of integers.

  logior &rest integers [function]

• bitwise-inclusive-or of integers.

  logxor &rest integers [function]

• bitwise-exclusive-or of integers.

  logeqv &rest integers [function]

• logeqv is equivalent to (lognot (logxor ...)).

  lognand &rest integers [function]

• bitwise-nand of integers.

  lognor &rest integers [function]

• bitwise-nor of integers.

  lognot integer [function]

• bit reverse of integer.

  logtest integer1 integer2 [function]

• T if (logand integer1 integer2) is not zero.

  logbitp index integer [function]

• T if indexth bit of integer (counted from the LSB) is 1, otherwise NIL.

  ash integer count [function]

• Arithmetic Shift Left. If count is positive, shift direction is left, and if count is negative, integer is shifted to right by abs(count) bits.

  ldb target position width [function]

• LoaD Byte. Byte specifier for ldb and dpb does not exist in EusLisp. Use a pair of integers instead. The field of width bits at position within target is extracted. For example, (ldb #x1234 4 4) is 3.

  dpb value integer position width [function]

• DePosit byte. Width bits of value is put in integer at positionth bits from LSB.