zl:1 - FTP

319 loop-finish
I
loop-finish
Macro
(loop-finish) causes the iteration to terminate "normally", the same as implicit
termination by an iteration-driving clause, or by the use of while or
until - the epilogue code (if any) is run, and any implicitly collected result
is returned as the value of the loop. For example:
(loop for x in '(1 2 3 456)
call eet x
do (eond «= x 4) (loop-finish))))
=> (1 2 3 4)
This particular example would be better written as until (= x 4) in place of
the do clause.
See the section "loop Clauses", page 310.
lower-case-p char
Returns t if char is a lower-case letter.
(lower-ease-p #\a) => T
(lower-ease-p #\A) => NIL
Function
Ish number count Function
Returns number shifted left count bits if count is positive or zero, or number
shifted right Icountl bits if count is negative. Zero bits are shifted in
(at either end) to fill unused positions. number and count must be flXIlums.
Since the result is also a fumum, bits shifted off either end are lost. (In
some applications you might find ash useful for shifting bignums.)
Note that like the Zetalisp functions whose name begins with the percentsign
(%), Ish is machine-dependent.
Examples:
(lsh 4 1) => #019
(lsh #014 -2) => #03
(lsh -1 1) => #0-2
(lsh -199 27) => -536879912 ; (ash -199 27) => -13421772899
For a table of related items: See the section "Machine-dependent Arithmetic
Functions" in Symbolics Common Lisp: Language Concepts.