compiler.tree.propagation.transforms: fix shift transform

diff --git a/basis/compiler/tree/propagation/transforms/transforms.factor b/basis/compiler/tree/propagation/transforms/transforms.factor
index ad0d9b2b5d16330bccdb7c7e031b9895501711f0..3fd7af0324a7d74d7eee65aa33909ed86c956167 100644 (file)
--- a/basis/compiler/tree/propagation/transforms/transforms.factor
+++ b/basis/compiler/tree/propagation/transforms/transforms.factor
@@ -63,7 +63,7 @@ IN: compiler.tree.propagation.transforms
                 ] if
             ] if
         ]
-    ] [ drop f ] if
+    ] [ f ] if
 ] "custom-inlining" set-word-prop
 
 ! Generate more efficient code for common idiom