BODY⟩
Перейти к навигации
Перейти к поиску
BODY> (от тела) — фортовское слово Каллисто.
BODY> ( a −− т ) От тела. От поля параметров к полю кода.
Слово BODY> преобразует PFA в CFA. Оно позволяет узнать токен слова, если известен адрес его поля параметров.
Ввод слова BODY>[править]
В режиме ЛАТ последовательно нажмите клавиши В/О 5 K , P F ИП
Эти нажатия оставляют клавиатуру в режиме NUM.
История[править]
Слово BODY> попало в Каллисто из расширения (не обязательного к реализации) стандарта Форт−83. Ранее, в fig-Форте, оно называлось CFA.
Слово из расширения стандарта Форт−83 (не обязательное).
В FORTH ИТЭФ это слово использовалось вместо отсутствовавшего слова 2−.
BODY> в предыдущем стандарте Forth-83 (англ.)[править]
BODY> addr1 -- addr2 "from-body" addr2 is the compilation address corresponding to the parameter field address addr1.
CFA в fig-FORTH Release 1 glossary, май 1979 (англ.)[править]
CFA pfa --- cfa Convert the parameter field address of a definition to its code field address.
Реализация[править]
1287 NONEP: PKRM03 + PKM03 KGOTO9 … 1289 JTWOM: 2 +/− GOTO NONEP … 2286 ;#BODYfrom 2287 ; BODY> ( a −− т ) От тела. От поля параметров к полю кода. 2288 LCFA: .DB 5 2289 .TEXT "BODY>" ; ( pfa −− cfa ) 2290 .DW LCSTOR 2291 CFA: .DW JTWOM
Советская реализация[править]
Юрий Семёнов описывает слово BODY> как синоним 2− (стр. 73).
Описание и определение слова BODY> в ядре ФОРТ-ЕС:
BODY> * PFA->CFA ОТ ПОЛЯ ПАРАМЕТРОВ К ПОЛЮ КОДА 30 Экран номер 30 ( 31.03.86 >BODY BODY> >LINK LINK> L>NAME N>LINK >NAME NAME> ) : BODY> ( PFA->CFA) 2- ;
В FORTH ИТЭФ слово BODY> называлось CFA и было примитивом. Вот его определение:
HEAD 203Q,'CF',301Q,CFA ; CFA POP AX SUB AX, 2 PUSH AX NEXT
Ссылки[править]
- Исходный текст слова BODY> в Каллисто Классик 1.0
- См. слова >BODY, NAME>, N>BODY и N>LINK
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |