17.05.2015 Views

zl:1 - FTP

zl:1 - FTP

zl:1 - FTP

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

and<br />

20<br />

I<br />

(when (and bright-day<br />

glorious-day<br />

(princ HIt is a bright and glorious day."»)<br />

Note: (and) => t , which is the identity for the and operation.<br />

For a table of related items: See the section "Conditional Functions" in<br />

Symbolics Common Lisp: Language Concepts.<br />

and &rest types Type Specifier<br />

The type specifier and allows the definition of data types that are the intersection<br />

of other data types specified by types. As a type specifier, and<br />

can only be used in list form.<br />

Examples:<br />

(typep 89 '(and integer number» => T<br />

(subtypep 'bit-vector '(and vector array» => T and T<br />

(sys:type-arglist 'and) => (&REST TYPES) and T<br />

See the section "Data Types and Type Specifiers" in Symbolics Common<br />

Lisp: Language Concepts.<br />

For a discussion of the function and: See the section "Flow of Control" in<br />

Symbolics Common Lisp: Language Concepts.<br />

<strong>zl</strong>:ap-l array index Function<br />

This is an obsolete version of <strong>zl</strong>:aloc that only works for one-dimensional<br />

arrays. There is no reason ever to use it.<br />

<strong>zl</strong>:ap-2 array indexl index2 Function<br />

This is an obsolete version of <strong>zl</strong>:aloc that only works for two-dimensional<br />

arrays. There is no reason ever to use it.<br />

<strong>zl</strong>:ap-Ieader array index Function<br />

Returns a locative pointer to the indexed element of array's leader. array<br />

should be an array with a leader, and index should be an integer. See the<br />

section "Cells and Locatives".<br />

However, the preferred method is to use locf and array-leader as shown in<br />

the following example:<br />

(setq *array*<br />

(make-array '(2 3) :element-type 'character<br />

:leader-list '(t nil»)<br />

(locf (array-leader *array* 1»

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!