|  | ANSI Common Lisp  5 Data and Control Flow  5.3 Dictionary of Data and Control Flow 
 
| 5.3.51  multiple-value-prog1 | Special Operator |  
 Syntax:
multiple-value-prog1
first-form {form}*
   first-form-results 
Arguments and Values:
first-form - a form; evaluated as described below.
form - a form; evaluated as described below.
 
first-form-results - the values resulting from
			     the evaluation of first-form.      
 
Description:
multiple-value-prog1 evaluates first-form and saves
all the values produced by that form. It then evaluates each 
form from left to right, discarding their values.  
Examples:
 (setq temp '(1 2 3))  (1 2 3)
 (multiple-value-prog1
    (values-list temp)
    (setq temp nil)
    (values-list temp))  1, 2, 3 
See Also:
prog1
Allegro CL Implementation Details:
 None. |