vocabs.loader: Fix spacing. Remove unit test.

db4
Doug Coleman 2011-11-02 18:17:14 -07:00
parent bf0e07cffe
commit 7699fb92b1
2 changed files with 1 additions and 2 deletions

View File

@ -185,7 +185,6 @@ forget-junk
[ ] [ "vocabs.loader.test.m" require ] unit-test
[ t ] [ "vocabs.loader.test.n" lookup-vocab >boolean ] unit-test
[ ] [ "vocabs" load ] unit-test
[ f ] [ "vocabs.loader.test.p" lookup-vocab ] unit-test
[ ] [ "vocabs.loader.test.p.private" require ] unit-test
[ { "foo" } ] [ "vocabs.loader.test.p" words [ name>> ] map ] unit-test

View File

@ -142,7 +142,7 @@ GENERIC: (require) ( name -- )
M: vocab (require)
[
dup source-loaded?>> +parsing+ eq? [ drop ] [
dup source-loaded?>> +parsing+ eq? [ drop ] [
dup source-loaded?>> [ dup load-source ] unless
dup docs-loaded?>> [ dup load-docs ] unless
drop