diff --git a/tools/comcom.lisp b/tools/comcom.lisp
index 0f5a8a5a1272af86a13abbdd1fb04da263fb017b..c8f5339354527a6ae3488bc1122a6cf6ac7b0ca8 100644
--- a/tools/comcom.lisp
+++ b/tools/comcom.lisp
@@ -140,10 +140,10 @@
   (comf "target:compiler/sparc/vm")
   (comf "target:compiler/generic/primtype")
   (comf "target:compiler/sparc/move")
+  (comf "target:compiler/sparc/float")
   (comf "target:compiler/sparc/sap")
   (comf "target:compiler/sparc/system")
   (comf "target:compiler/sparc/char")
-  (comf "target:compiler/sparc/float")
   (comf "target:compiler/sparc/memory")
   (comf "target:compiler/sparc/static-fn")
   (comf "target:compiler/sparc/arith")
@@ -172,12 +172,12 @@
   (comf "target:compiler/rt/macros" :load *load-stuff*)
   (comf "target:compiler/rt/vm")
   (comf "target:compiler/rt/move")
-  (comf "target:compiler/rt/sap")
-  (comf "target:compiler/rt/system")
-  (comf "target:compiler/rt/char")
   (if (eq vm::*target-float-hardware* :afpa)
       (comf "target:compiler/rt/afpa")
       (comf "target:compiler/rt/mc68881"))
+  (comf "target:compiler/rt/sap")
+  (comf "target:compiler/rt/system")
+  (comf "target:compiler/rt/char")
   (comf "target:compiler/rt/memory")
   (comf "target:compiler/rt/static-fn")
   (comf "target:compiler/rt/arith")