compiler.crossref: cleanup
parent
52e25f190c
commit
6eceff6acb
|
@ -86,7 +86,7 @@ M: word combinator? inline? ;
|
||||||
[
|
[
|
||||||
dup crossref? [
|
dup crossref? [
|
||||||
[ dependencies get generic-dependencies get compiled-xref ]
|
[ dependencies get generic-dependencies get compiled-xref ]
|
||||||
[ conditional-dependencies get save-conditional-dependencies ]
|
[ conditional-dependencies get set-dependency-checks ]
|
||||||
bi
|
bi
|
||||||
] [ drop ] if
|
] [ drop ] if
|
||||||
] tri ;
|
] tri ;
|
||||||
|
|
|
@ -107,5 +107,5 @@ compiled-generic-crossref [ H{ } clone ] initialize
|
||||||
[ compiled-generic-crossref get delete-at ]
|
[ compiled-generic-crossref get delete-at ]
|
||||||
tri ;
|
tri ;
|
||||||
|
|
||||||
: save-conditional-dependencies ( word deps -- )
|
: set-dependency-checks ( word deps -- )
|
||||||
keys f like "dependency-checks" set-word-prop ;
|
keys f like "dependency-checks" set-word-prop ;
|
||||||
|
|
Loading…
Reference in New Issue