diff --git a/test/test-core.lisp b/test/test-core.lisp
index 4472f4f..8b7dd3c 100644
--- a/test/test-core.lisp
+++ b/test/test-core.lisp
@@ -72,7 +72,8 @@
       (t:show-result))))
 
 (deftest test-util ()
-  (let ((35+ (util:curry #'+ 35)))
+  (let* ((25+ (util:curry #'+ 25))
+         (35+ (util:curry 25+ 10)))
     (== (funcall 35+ 7) 42))
   (let ((now (get-universal-time)))
     (== (util:from-unix-time (util:to-unix-time now)) now))