diff --git a/basis/compiler/cfg/instructions/instructions.factor b/basis/compiler/cfg/instructions/instructions.factor
index 4552c010fa..5cefdb44b5 100644
--- a/basis/compiler/cfg/instructions/instructions.factor
+++ b/basis/compiler/cfg/instructions/instructions.factor
@@ -819,19 +819,19 @@ UNION: allocation-insn
     ##box-displaced-alien ;
 
 UNION: conditional-branch-insn
-##compare-branch
-##compare-imm-branch
-##compare-integer-branch
-##compare-integer-imm-branch
-##test-branch
-##test-imm-branch
-##compare-float-ordered-branch
-##compare-float-unordered-branch
-##test-vector-branch
-##check-nursery-branch
-##fixnum-add
-##fixnum-sub
-##fixnum-mul ;
+    ##compare-branch
+    ##compare-imm-branch
+    ##compare-integer-branch
+    ##compare-integer-imm-branch
+    ##test-branch
+    ##test-imm-branch
+    ##compare-float-ordered-branch
+    ##compare-float-unordered-branch
+    ##test-vector-branch
+    ##check-nursery-branch
+    ##fixnum-add
+    ##fixnum-sub
+    ##fixnum-mul ;
 
 ! For alias analysis
 UNION: read-insn ##slot ##slot-imm ##vm-field ##alien-global ;
@@ -858,23 +858,23 @@ TUPLE: gc-map scrub-d scrub-r gc-roots derived-roots ;
 ! Instructions that clobber registers. They receive inputs and
 ! produce outputs in spill slots.
 UNION: hairy-clobber-insn
-##call-gc
-alien-call-insn
-##callback-inputs
-##callback-outputs
-##unbox-long-long ;
+    ##call-gc
+    alien-call-insn
+    ##callback-inputs
+    ##callback-outputs
+    ##unbox-long-long ;
 
 ! Instructions that clobber registers but are allowed to produce
 ! outputs in registers. Inputs are in spill slots, except for
 ! inputs coalesced with the output, in which case that input
 ! will be in a register.
 UNION: clobber-insn
-hairy-clobber-insn
-##unbox
-##box
-##box-long-long ;
+    hairy-clobber-insn
+    ##unbox
+    ##box
+    ##box-long-long ;
 
 UNION: def-is-use-insn
-##box-alien
-##box-displaced-alien
-##unbox-any-c-ptr ;
+    ##box-alien
+    ##box-displaced-alien
+    ##unbox-any-c-ptr ;
diff --git a/basis/compiler/cfg/representations/selection/selection.factor b/basis/compiler/cfg/representations/selection/selection.factor
index 827e4ea994..cdb10598c6 100644
--- a/basis/compiler/cfg/representations/selection/selection.factor
+++ b/basis/compiler/cfg/representations/selection/selection.factor
@@ -73,17 +73,17 @@ SYMBOL: costs
     ] each ; inline
 
 UNION: inert-tag-untag-insn
-##add
-##sub
-##and
-##or
-##xor
-##min
-##max ;
+    ##add
+    ##sub
+    ##and
+    ##or
+    ##xor
+    ##min
+    ##max ;
 
 UNION: inert-arithmetic-tag-untag-insn
-##add-imm
-##sub-imm ;
+    ##add-imm
+    ##sub-imm ;
 
 UNION: inert-bitwise-tag-untag-insn
     ##and-imm