diff --git a/ansi-tests/places.lsp b/ansi-tests/places.lsp index c40798ab16692d16938a6a0a74e2bcfe14537b03..dd10704d951d5aa02b6dbeffe8fd79276c43b8da 100644 --- a/ansi-tests/places.lsp +++ b/ansi-tests/places.lsp @@ -140,7 +140,7 @@ (let ((x nil) (y nil) (z nil)) (setf (values x y z) (values 1 2 3)) (values z y x)) - z y x) + 3 2 1) (deftest setf-values.3 (let ((x nil) (y nil) (z nil))