вощем, бывает лень отслеживать что и сколько возвращает параметров, к примеру на выходе из слова (может ничего, а может мусора кучу) и вобщем не стоит напрягаться ловить, к примеру:
Код:
: something ( addr --> )
BEGIN DUP WHILE ( --> addr )
1st operation WHILE ( --> ??? )
2st operation WHILE ( --> ??? )
<LINK
REPEAT \ лишние элементы
THEN \ на стеке данных можно
THEN \ удалять тут
;
но можно сделать так:
Код:
: something ( addr --> )
<: BEGIN DUP WHILE ( --> addr )
1st operation WHILE ( --> ??? )
2st operation WHILE ( --> ??? )
<LINK
REPEAT THEN THEN
;> CATCH DDROP ;
вощем, бывает лень отслеживать что и сколько возвращает параметров, к примеру на выходе из слова (может ничего, а может мусора кучу) и вобщем не стоит напрягаться ловить, к примеру:
[code]
: something ( addr --> )
BEGIN DUP WHILE ( --> addr )
1st operation WHILE ( --> ??? )
2st operation WHILE ( --> ??? )
<LINK
REPEAT \ лишние элементы
THEN \ на стеке данных можно
THEN \ удалять тут
;
[/code]
но можно сделать так:
[code]
: something ( addr --> )
<: BEGIN DUP WHILE ( --> addr )
1st operation WHILE ( --> ??? )
2st operation WHILE ( --> ??? )
<LINK
REPEAT THEN THEN
;> CATCH DDROP ;
[/code]