Liste des Groupes | Revenir à cl forth |
On Sun, 4 Aug 2024 11:24:42 +0000, albert@spenarnc.xs4all.nl wrote:Maybe you meant (DOES>) which is compiled by executing DOES> ?
>In article <c2588b8c811fd3ae75d3976c3a927fc3@www.novabbs.com>,>
FFmike <oh2aun@gmail.com> wrote:This post inspired me to remove all the DOLIT DODOES DOCREATE and DOUSER>
stuff and to instead
compile a inline code literal and a jump to the common class code.
>
CREATE was modified to compile one inline literal, a RETURN and a NOP,
the literal points to the data area. Later the RETURN and NOP are
replaced by a JUMP to code after DOES> or in USER.
Afterwards a second DOES> is required to change the behaviour.
Is that possible with this setup.
I do not understand. I have only one DOES>
>
: value: create , does> @ ; ok
see value:
2ce2 ec8f call create
2ce6 ec17 call ,
2cea ecff call (does>)
2cee efa5 goto @
>
here u. c1ec ok
>
1234 value: a-value ok
see a-value
2cfc 0ec1 pushl c1
2cfe 0eec pushl ec
2d00 ef77 goto 2cee
>
a-value . 1234 ok
>
What is the second DOES> needed for ?
Les messages affichés proviennent d'usenet.