diff --git a/ansi-tests/max.lsp b/ansi-tests/max.lsp
index 4e7cffc91425c9a19842aa3524907f86011ca461..ac1a8bc926504a0f6a71a1a8d86735f61312fee3 100644
--- a/ansi-tests/max.lsp
+++ b/ansi-tests/max.lsp
@@ -14,7 +14,7 @@
 (deftest max.error.2
   (loop for x in *mini-universe*
 	unless (or (realp x)
-		   (eq (classify-error** `(classify-error (max ',x)))
+		   (eq (eval `(classify-error (max ',x)))
 		       'type-error))
 	collect x)
   nil)
diff --git a/ansi-tests/min.lsp b/ansi-tests/min.lsp
index d96f80f7a2a57bf33d723bcf7d25dfb5053c0eb9..24224fa4f7898d4d4577c5886697577054b74712 100644
--- a/ansi-tests/min.lsp
+++ b/ansi-tests/min.lsp
@@ -14,7 +14,7 @@
 (deftest min.error.2
   (loop for x in *mini-universe*
 	unless (or (realp x)
-		   (eq (classify-error** `(classify-error (min ',x)))
+		   (eq (eval `(classify-error (min ',x)))
 		       'type-error))
 	collect x)
   nil)