diff --git a/core/vocabs/parser/parser.factor b/core/vocabs/parser/parser.factor index 8f03af23f3..dccf1f1be6 100644 --- a/core/vocabs/parser/parser.factor +++ b/core/vocabs/parser/parser.factor @@ -70,7 +70,7 @@ ERROR: no-word-in-vocab word vocab ; words>> swap [ swap [ swap ":" glue ] dip ] curry assoc-map ; : (lookup) ( name assoc -- word/f ) - at dup forward-reference? [ drop f ] when ; + at* [ dup forward-reference? [ drop f ] when ] when ; : (use-words) ( assoc -- extra-words seq ) manifest get qualified-vocabs>> ;