+(define-builtin values-array (array)
+ (concat "values.apply(this, " array ")"))
+
+(define-raw-builtin values (&rest args)
+ (if *compiling-lambda-p*
+ (concat "values(" (join (mapcar #'ls-compile args) ", ") ")")
+ (compile-funcall 'values args)))
+