Looks like our implementation doesn't match CL's after all.

(blah2-call) evaluates to (2 5) in Common Lisp, but [2, undefined] in Parenscript.

(defun blah1 ()
  (values 2 5))

(defun blah2 ()
  (blah1))

(defun blah2-call ()
  (multiple-value-bind (a b) (blah2) (list a b)))

Daniel