Fix compiled-xref
parent
be2c8b13d7
commit
f7ca140c23
|
@ -99,7 +99,7 @@ SYMBOL: compiled-crossref
|
||||||
compiled-crossref global [ H{ } assoc-like ] change-at
|
compiled-crossref global [ H{ } assoc-like ] change-at
|
||||||
|
|
||||||
: compiled-xref ( word dependencies -- )
|
: compiled-xref ( word dependencies -- )
|
||||||
[ crossref? ] subset
|
[ drop crossref? ] assoc-subset
|
||||||
2dup "compiled-uses" set-word-prop
|
2dup "compiled-uses" set-word-prop
|
||||||
compiled-crossref get add-vertex* ;
|
compiled-crossref get add-vertex* ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue