GC maps for more compact inline GC checks

[factor.git] / basis / compiler / cfg / stacks / uninitialized / uninitialized.factor

diff --git a/basis/compiler/cfg/stacks/uninitialized/uninitialized.factor b/basis/compiler/cfg/stacks/uninitialized/uninitialized.factor
index 3d7519e14ba9e79dcbaeba863af4ece84c793c74..982e9b872cbffd96af4580a0233876e8c165fe41 100644 (file)
--- a/basis/compiler/cfg/stacks/uninitialized/uninitialized.factor
+++ b/basis/compiler/cfg/stacks/uninitialized/uninitialized.factor
@@ -77,5 +77,5 @@ M: uninitialized-analysis join-sets ( sets analysis -- pair )
         first2
         [ [ <ds-loc> ] (uninitialized-locs) ]
         [ [ <rs-loc> ] (uninitialized-locs) ]
-        bi* append
+        bi* append f like
     ] when ;