diff --git a/src/klotz/defdef.9 b/src/klotz/defdef.10
similarity index 98%
rename from src/klotz/defdef.9
rename to src/klotz/defdef.10
index a642428d..12a6b1ea 100755
--- a/src/klotz/defdef.9
+++ b/src/klotz/defdef.10
@@ -106,7 +106,7 @@
   `(progn 'compile
 	  (declare (special ,name))
 	  (putprop ',name ,nbytes 'INSTRUCTION-LENGTH)
-	  (putprop ',name ,(process-pattern pattern) 'ADDRESS-MODE-PATTERN)
+	  (putprop ',name ',(process-pattern pattern) 'ADDRESS-MODE-PATTERN)
 	  (putprop ',name
 		   #'(lambda (OP ,@(variables-in-pattern pattern))
 		       ,@forms)