diff --git a/utils-tests.rkt b/utils-tests.rkt
index d1855ad..54cc12c 100644
--- a/utils-tests.rkt
+++ b/utils-tests.rkt
@@ -27,7 +27,7 @@
 
   (test-case "eval-with"
     (check-equal? (let ([ht #hash((a . 1) (b . 1))])
-                    (eval-with1 ht '(+ b a 1)))
+                    (eval-with ht '(+ b a 1)))
                   3)))
 
 (test-case "Analysis of quoted expressions"