diff --git a/basis/compiler/tree/propagation/known-words/known-words.factor b/basis/compiler/tree/propagation/known-words/known-words.factor
index 24fb3e83ac..00d41bc13b 100644
--- a/basis/compiler/tree/propagation/known-words/known-words.factor
+++ b/basis/compiler/tree/propagation/known-words/known-words.factor
@@ -225,6 +225,7 @@ generic-comparison-ops [
     { >fixnum fixnum }
     { bignum>fixnum fixnum }
     { integer>fixnum fixnum }
+    { integer>fixnum-strict fixnum }
 
     { >bignum bignum }
     { fixnum>bignum bignum }
diff --git a/basis/compiler/tree/propagation/transforms/transforms.factor b/basis/compiler/tree/propagation/transforms/transforms.factor
index a7ec584b55..6e0e8210a1 100644
--- a/basis/compiler/tree/propagation/transforms/transforms.factor
+++ b/basis/compiler/tree/propagation/transforms/transforms.factor
@@ -329,11 +329,7 @@ M\ set intersect [ intersect-quot ] 1 define-partial-eval
     [ [ dup [ \ >fixnum no-method ] unless ] ] [ f ] if ;
 
 ! Speeds up fasta benchmark
-\ >fixnum [
-    custom-inline-fixnum
-] "custom-inlining" set-word-prop
-
-{ integer>fixnum integer>fixnum-strict } [
+{ >fixnum integer>fixnum integer>fixnum-strict } [
     [ custom-inline-fixnum ] "custom-inlining" set-word-prop
 ] each