(defun our-values ()
	(multiple-value-bind (x y z)
	(values 1 2 35)
	(list x y z)))

(deftest test-our-values()
	(check
		(equalp '(1 2 35) (our-values))))