Delete Non-Global Words
[1/6] from: info::id-net::ch at: 29-Jan-2003 19:52
I'm using an old version of Rebol/View, where the system/words was limited to 4096 words. Is there a way to delete all non-global words ? Philippe
[2/6] from: info:id-net:ch at: 30-Jan-2003 9:21
No one knows.. ??
[3/6] from: sunandadh:aol at: 30-Jan-2003 3:39
> No one knows.. ??
Maybe no one wants to give you the bad news... Once a word has been defined, the name remains in first system/words for the life of the console. Only way to get rid of it is to stop and restart again. Doesn't matter if the word is unset in all contents; the name remains. A name is only in there once regardless of how many contexts it is in, so these two functions: ff: func [/local aa bb cc]  aa: func [/local ff bb cc]  Add only four words (aa bb cc and ff). That's one way of reducing the number of words you have. But you must have a fairly large program if you are running out if words. So maybe you need to upgrade to the later versions -- they have room for 8000+ words. Or you might be running out because you are doing load: load "xx yy zz" will add three words even though you never intended xx yy zz to be words -- you can see that with: last first system/words Try to-block instead. to-block "ww vv uu" ;; does not create three new words. Hth Sunanda.
[4/6] from: info:id-net:ch at: 30-Jan-2003 10:22
ok Sunanda, thanks for being the Roman Messenger (You know when the Roman Emperor used to kill the messenger when he arrived with bad news) 8-)) But I prefer knowing it than not.
[5/6] from: info:id-net:ch at: 21-Feb-2003 13:32
Sunanda, you told me that later version of View came with 8000+ words.. The latest View 22.214.171.124.1 is limited to 4096, as an old one. Which version could have more words ?
[6/6] from: sunandadh:aol at: 21-Feb-2003 17:42
> Sunanda, you told me that later version of View came with 8000+ words.. The > latest View 126.96.36.199.1 is limited to 4096, as an old one. Which version > could have more words ?
I'm seeing 8062 in beta REBOL/View 188.8.131.52.1 (3-Aug-2002). You can test it this way (though your console will need to be shut down and restarted afterwards -- you can't do much with all words in use): about n: 1 attempt [ forever [ to-word join "a" n n: n + 1 ] ] length? first system/words Sunanda.