alien.inline: allow compiling from non-file vocabs
parent
b421a360c0
commit
1c42ebd89e
|
@ -43,8 +43,10 @@ SYMBOL: c-strings
|
||||||
|
|
||||||
: compile-library? ( -- ? )
|
: compile-library? ( -- ? )
|
||||||
c-library get library-path dup exists? [
|
c-library get library-path dup exists? [
|
||||||
file get path>>
|
file get [
|
||||||
[ file-info modified>> ] bi@ <=> +lt+ =
|
path>>
|
||||||
|
[ file-info modified>> ] bi@ <=> +lt+ =
|
||||||
|
] [ drop t ] if*
|
||||||
] [ drop t ] if ;
|
] [ drop t ] if ;
|
||||||
|
|
||||||
: compile-library ( -- )
|
: compile-library ( -- )
|
||||||
|
|
Loading…
Reference in New Issue