|
From: Matthias T. <mt...@we...> - 2010-07-08 10:25:27
|
Hi Pito, > Hi dear friends, > as I am a newbie in forth I would kindly ask you for a minor help with > a definition of a new word - "redef" > > : redef ( string"word" -- n1 ) > > 1. n1 = 0, it finds the address ADDR_LAST of "word" (from the newest > side - lefthandside)and memorise it; if not n1=-1 and exit > 2. it finds the address of the next "word" (the next olderer in the word > list) and replaces its address with the address in ADDR_LAST; n1++ > 3. repeats till the end of the wordlist (to the very righthandside word) That's definitly not a task for a forth "beginner" and goes very deep into the code of amforth. Sorry, but I cannot provide any assistance here and now. Matthias |