Updating code for make and fry changes

[factor.git] / basis / stack-checker / state / state.factor

diff --git a/basis/stack-checker/state/state.factor b/basis/stack-checker/state/state.factor
index 0d0de7f19b1faed6bc497d4c21035c2494dd3492..d3d32b50147d73eccd56d75d4c2e90571a338809 100755 (executable)
--- a/basis/stack-checker/state/state.factor
+++ b/basis/stack-checker/state/state.factor
@@ -91,7 +91,7 @@ SYMBOL: dependencies
 : depends-on ( word how -- )
     over primitive? [ 2drop ] [
         dependencies get dup [
-            swap '[ , strongest-dependency ] change-at
+            swap '[ _ strongest-dependency ] change-at
         ] [ 3drop ] if
     ] if ;
 
@@ -100,7 +100,7 @@ SYMBOL: generic-dependencies
 
 : depends-on-generic ( generic class -- )
     generic-dependencies get dup
-    [ swap '[ null or , class-or ] change-at ] [ 3drop ] if ;
+    [ swap '[ null or _ class-or ] change-at ] [ 3drop ] if ;
 
 ! Words we've inferred the stack effect of, for rollback
 SYMBOL: recorded