;Reading at top level in Editor Typeout Window 1.
;Reading in base 10 in package USER with standard Zetalisp readtable.

(cond ((values 1 2 3)) (t nil))
1
(cond ((values 1 2 3)))
1
2
3
(dribble-all)