remove more bad words from random-tester

darcs
erg 2006-12-05 16:34:11 +00:00
parent f16e80b678
commit fe0c2f6ca2
1 changed files with 5 additions and 3 deletions

View File

@ -81,14 +81,16 @@ SYMBOL: wordbank
gensym random-int counter <byte-array>
<word> <client-stream> <server> <client>
<duplex-stream>
<file-writer> <file-reader>
init-namespaces unxref-word set-global
<file-writer> <file-reader> <file-r/w>
init-namespaces unxref-word set-global set off on
nest
set-restart-obj
+@ inc dec
! 0.0 5000000 condition
condition
changed-words
callstack namespace namestack global vocabularies
file. (file.) path+ parent-dir
@ -98,7 +100,7 @@ SYMBOL: wordbank
}
{ "arrays" "errors" "generic" "graphs" "hashtables" "io"
"kernel" "math" "namespaces"
"queues" "strings" "sequences" "words" "vectors" "words" }
"queues" "strings" "sequences" "vectors" "words" }
[ words ] map concat diff ;
w1 wordbank set-global