diff --git a/src/cmp/cmptype-arith.lsp b/src/cmp/cmptype-arith.lsp
index 9379de059..35f16837c 100644
--- a/src/cmp/cmptype-arith.lsp
+++ b/src/cmp/cmptype-arith.lsp
@@ -55,8 +55,8 @@
     (SINGLE-FLOAT 'SINGLE-FLOAT)
     (DOUBLE-FLOAT 'DOUBLE-FLOAT)
     (LONG-FLOAT 'LONG-FLOAT)
-    (SYMBOL 'SYMBOL)
     (NULL 'NULL)
+    (SYMBOL 'SYMBOL)
     ((OR BASE-CHAR STANDARD-CHAR CHARACTER EXTENDED-CHAR) 'CHARACTER)
     (BASE-STRING 'BASE-STRING)
     (STRING 'STRING)