diff --git a/ansi-tests/if.lsp b/ansi-tests/if.lsp
index 26af82e3a8f63117c1c26189be4cd59ed50f26a1..764e287c62264ca8ad575faafeed979414383394 100644
--- a/ansi-tests/if.lsp
+++ b/ansi-tests/if.lsp
@@ -33,16 +33,3 @@
   (let ((i 0))
     (values (if (= (incf i) 1) 't nil) i))
   t 1)
-
-(deftest if.error.1
-  (classify-error (if))
-  program-error)
-
-(deftest if.error.2
-  (classify-error (if t 1 2 3))
-  program-error)
-
-
-
-
-