zl:1 - FTP

zl:typep
598
I
: rational arg is a ratio.
: single-float arg is a single-precision floating-point number.
: double-float arg is a double-precision floating-point number.
: complex arg is a complex number.
:list
arg is a cons.
: locative arg is a locative pointer.
: compiled-function
arg is the machine code for a compiled function.
: closure arg is a closure.
: select-method arg is a select-method table.
: stack-group
: string
: array
arg is a stack-group.
arg is a string.
arg is an array that is not a string.
: random Returned for any built-in data type that does not fit into
one of the above categories.
{oo
An object of user-defined data type {oo (any symbol).
The primitive type of the object could be array, or instance.
(zl:typep instance) returns the symbol that is the name of the instance's
flavor.
(zl:typep instance 'flavor-name returns t if the flavor of instance is named
flavor-name or contains that flavor as a direct or indirect component, nil
otherwise.
Examples:
(zl:typep 'common :SYMBOL) => T
(zl :typep 4 ) => :FIXNUM
(zl:typep .BBBB1) => :SINGLE-FLOAT
(zl :typep BdB :DOUBLE-FLOAT) => T
(zl:typep #c(1.2 3.3)) => :COMPLEX
(zl :typep "good day sunshine" :STRING) => T
(zl :typep #(a b c)) => :ARRAY
The type argument to zl:typep of two arguments can be any of the above
keyword symbols (except for :random), the name of a user-defined data
type (either a named structure or a flavor), or one of the following additional
symbols:
:atom
:ilX
:float
Any atom (as determined by the atom predicate).
Any kind of fixed-point number (fumum or bignum).
Any kind of floating-point number (single- or doubleprecision).
: numb er Any kind of number.
:non-complex-number
Any noncomplex number.