Слово J
J (джэй) — стандартное слово Каллисто.
Помещает в стек данных значение счётчика внешнего цикла FOR…NEXT.
Ввод слова J
В режиме ЛАТ нажмите белую клавишу 8
J в стандарте ANS Forth
6.1.1730 J CORE Интерпретация: Семантика интерпретации для этого слова не определена.
Выполнение:( -- n|u )( R: loop-sys1 loop-sys2 -- loop-sys1 loop-sys2 ) n|u - копия следующего-внешнего индекса цикла. Неопределенная ситуация существует, если параметры управления цикла следующего- внешнего цикла, loop-sys1, недоступны.
A.6.1.1730 J J может только использоваться со вложенными, DO...LOOP, DO...+LOOP, ?DO...LOOP, or ?DO...+LOOP, например, в форме:
: X ... DO ... DO ... J ... LOOP ... +LOOP ... ;
J в предыдущем стандарте Forth-83 (англ.)
J -- w C,79 w is a copy of the index of the next outer loop. May only be used within a nested DO-LOOP or DO-+LOOP in the form, for example: DO ... DO ... J ... LOOP ... +LOOP
J в стандарте Forth-79 (англ.)
J -- n C,225 Return the index of the next outer loop. May only be used within a nested DO-LOOP in the form: DO ... DO ... J ... LOOP ... LOOP
Реализация
Слово J в ФОРТ-ЕС было примитивом. Вот его определение:
Экран номер 24 ( 09.09.86 ЦИКЛЫ СО СЧЕТЧИКОМ: (DO/ I I' J LEAVE) CODE J ( ->U ТЕКУЩЕЕ ЗНАЧЕНИЕ СЧЕТЧИКА 2-ГО ЦИКЛА) RW1 RFIRST 6 +(, LH, PUSHRW1 В, END-CODE
Ссылки
- Слово J и комментарий к нему в стандарте ANS Forth (англ.)
- Слово J и комментарий к нему в черновике Forth 200x (англ.)
- Счётчик цикла в Википедии
- The Philosophy of Fixed Point в книге Leo Brodie Starting Forth (англ.)
- Throw It For a Loop в книге Leo Brodie Starting Forth (англ.)
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |