Structural Informatics Group (SIG) logo
Home | Projects | Demos | Downloads | Publications | Local Info | About Us | New site
Go to the first, previous, next, last section, table of contents.

psetq

psetq

type: special form (fsubr)
location: built-in
source file: xlcont.c
Common LISP compatible: yes
supported on: all machines

SYNTAX

(psetq [ <symbol> <expr> ] ... )
        <symbol>        -       un-evaluated symbol
        <expr>          -       value for <symbol>

DESCRIPTION

PSETQ sets <expr> as the value of <symbol>. There can be several pairs of assignment. PSETQ performs these assignments in parallel - the <symbol>'s are not assigned new values until all the <expr>'s have been evaluated. PSETQ returns the value from the last <expr> as it's result.

EXAMPLES

(psetq a 1)                             ; symbol A gets value 1
(psetq b '(a b c))                      ; symbol B gets value (A B C)
(psetq mynum (+ 3 4))                   ; symbol MYNUM gets value 7
                                        ;
(setq goo 'ber)                         ; returns BER
(setq num 1)                            ; returns 1
(psetq goo num num goo)                 ; returns BER
(print goo)                             ; returns 1
(print num)                             ; returns BER


Go to the first, previous, next, last section, table of contents.