steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

stack-checker: more use of hash-sets.

db4
John Benediktsson 2013-03-16 13:41:51 -07:00
parent ee1eb8bf09
commit 2bbec0dd61
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/crossref/crossref.factor
View File

@ -109,4 +109,4 @@ generic-call-site-crossref [ H{ } clone ] initialize
tri ; tri ;
: set-dependency-checks ( word deps -- ) : set-dependency-checks ( word deps -- )
keys f like "dependency-checks" set-word-prop ; members f like "dependency-checks" set-word-prop ;

4
basis/stack-checker/dependencies/dependencies.factor
View File

@ -69,7 +69,7 @@ GENERIC: satisfied? ( dependency -- ? )
: add-conditional-dependency ( ... class -- ) : add-conditional-dependency ( ... class -- )
boa conditional-dependencies get boa conditional-dependencies get
dup [ conjoin ] [ 2drop ] if ; inline dup [ adjoin ] [ 2drop ] if ; inline
TUPLE: depends-on-class-predicate class1 class2 result ; TUPLE: depends-on-class-predicate class1 class2 result ;
@ -147,7 +147,7 @@ M: depends-on-final satisfied?
: init-dependencies ( -- ) : init-dependencies ( -- )
H{ } clone dependencies set H{ } clone dependencies set
H{ } clone generic-dependencies set H{ } clone generic-dependencies set
H{ } clone conditional-dependencies set ; HS{ } clone conditional-dependencies set ;
: without-dependencies ( quot -- ) : without-dependencies ( quot -- )
[ [