⟩BODY

>BODY (к телу) — стандартное слово Каллисто. Получить адрес поля данных слова, токен которого находится в стеке.

>BODY          ( т −− a )                           К телу. Преобразовать адрес поля кода в адрес поля параметров.

Слово >BODY преобразует CFA в PFA.

Слово >BODY включено в обязательное «ядро» (CORE) действующего стандарта Форта и присутствует в черновике готовящегося стандарта. Его переносимость весьма необычна для таких «интимных» слов, как преобразования полей словарной статьи.

Ввод слова >BODY

В режиме NUM последовательно нажмите клавиши  F   ИП     Р-ГРД-Г   В/О   5   K    ,  

Для возврата в режим NUM нажмите синюю клавишу  P .

>BODY в стандарте ANS Forth

 6.1.0550   >BODY                             "to-body"                     CORE
            ( xt -- a-addr )
            a-addr - адрес области данных соответствующей xt. Неопределенная 
            ситуация существует, если xt не для слова определенного через 
            CREATE.

        См.: 3.3.3 Область данных.

 A.6.1.0550   >BODY
 a-addr - адрес, который HERE возвратило бы, если бы было выполнено немедленно 
 после выполнения CREATE которое определило xt.

>BODY в предыдущем стандарте Forth-83 (англ.)

     >BODY        addr1 -- addr2                83           "to-body"
          addr2 is the parameter field address corresponding to the
          compilation address addr1.  See:  "9.2 Addressable Memory"

Реализация

Вообще говоря, поле кода может занимать больше двух байт, например быть векторным или быть созданным с помощью <BUILDS. Размер поля кода нигде не хранится, так что программист должен должен знать структуру поля кода обрабатываемого слова, а не полагаться на слово >BODY, обрабатывающее лишь стандартный случай.

В Каллисто 1.0 слово >BODY является синонимом слова 2+ и использует его обработчик:

1284 JTWOP:          2
1285                 .DB 59H                         ; FX>=0 aka пропустить 1 байт
1286 JONEP:          1
1287 NONEP:          PKRM03 + PKM03  KGOTO9
…
1292 ;#toBODY
1293 ; >BODY            ( т −− a )                           К телу. Преобразовать адрес поля кода в адрес поля параметров.
1294 LGBODY:         .DB     5
1295                 .TEXT   ">BODY"                 ; ( cfa −− pfa )
1296                 .DW     LTWOP
1297 GBODY:          .DW     JTWOP                   ; Синоним 2+

Советская реализация

Описание и определение слова >BODY в ядре ФОРТ-ЕС:

>BODY     CFA->PFA ОТ ПОЛЯ КОДА К ПОЛЮ ПАРАМЕТРОВ               30

                     Экран номер 30
( 31.03.86  >BODY BODY> >LINK LINK> L>NAME N>LINK >NAME NAME> )

: >BODY  ( CFA->PFA) 2+ ;

Ссылки

• Исходный текст слова >BODY в Каллисто Классик 1.0
• См. слова BODY>, NAME>, N>BODY и N>LINK
• Слово >BODY (to-body) и комментарий к нему в стандарте ANS Forth (англ.)
• Слово >BODY (to-body) и комментарий к нему в черновике Forth 200x (англ.)
• ФУНКЦИОНИРОВАНИЕ ФОРТ-СИСТЕМЫ в книге Л.Броуди «Начальный курс программирования на языке Форт»

У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их.

Это заготовка статьи. Вы можете помочь проекту, дополнив её.