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)