diff --git a/data-and-control-flow/values.lsp b/data-and-control-flow/values.lsp
index 61cbc9b693ea221cb4a526d3873ad12884c7aa50..5d1c3edcc619409b6ed6d9490558d57e794eac8d 100644
--- a/data-and-control-flow/values.lsp
+++ b/data-and-control-flow/values.lsp
@@ -71,3 +71,6 @@
             i a b c))
   (1 2 3) 3 1 2 3)
 
+(deftest values.order.2
+  ((lambda (a) (lcm (values a (setq a 1)))) 10)
+  10)