diff --git a/src/new-cmp/cmpmac.lsp b/src/new-cmp/cmpmac.lsp
index e470b9e02..ab1474980 100644
--- a/src/new-cmp/cmpmac.lsp
+++ b/src/new-cmp/cmpmac.lsp
@@ -128,6 +128,7 @@
 (defmacro make-c1form* (&rest args)
   `(list (make-c1form-alone ,@args)))
 
+#+(or)
 (defmacro make-c1form-alone (name &rest args)
   (let ((info-args '())
 	(form-args '()))