diff --git a/basis/compiler/cfg/ssa/destruction/destruction.factor b/basis/compiler/cfg/ssa/destruction/destruction.factor
index eea64eec07..ff174bc713 100644
--- a/basis/compiler/cfg/ssa/destruction/destruction.factor
+++ b/basis/compiler/cfg/ssa/destruction/destruction.factor
@@ -82,7 +82,7 @@ M: insn prepare-insn
         [ defs-vreg ] [ uses-vregs ] bi
         2dup empty? not and [
             first
-            2dup [ rep-of ] bi@ eq?
+            2dup [ rep-of reg-class-of ] bi@ eq?
             [ try-to-coalesce ] [ 2drop ] if
         ] [ 2drop ] if
     ] bi ;