Fixing issue where require-when could create a circularity

2010-04-21 00:40:40 -05:00 · 2010-04-21 00:40:40 -05:00 · c5530080c4
parent 305c3de2af
commit c5530080c4
1 changed files with 1 additions and 1 deletions
--- a/core/vocabs/loader/loader.factor
+++ b/core/vocabs/loader/loader.factor
@ -75,7 +75,7 @@ require-when-table [ V{ } clone ] initialize
 : load-conditional-requires ( vocab -- )
    vocab-name require-when-vocabs get in? [
        require-when-table get [
-            [ [ vocab ] all? ] dip
+            [ [ vocab dup [ source-loaded?>> +done+ = ] when ] all? ] dip
            [ require ] curry when
        ] assoc-each
    ] when ;