CURRENT

CURRENT (текущий) — стандартное слово Каллисто.

Переменная указывает список VOCABULARY, в который вводятся определения новых слов.

К переменной CURRENT редко обращаются по имени. Обычно её значение меняют с помощью слова DEFINITIONS.

Ввод слова CURRENT

В режиме ЛАТ последовательно нажмите клавиши  С/П   3   ×   ×   ИП   4   2 

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

     CURRENT      -- addr                       U,79
          The address of a variable specifying the vocabulary in which
          new word definitions are appended.

CURRENT в стандарте Forth-79 (англ.)

CURRENT        -- addr                       U,137
    Leave the address of a variable specifying the vocabulary into
    which new word definitions are to be entered.

GET-CURRENT в стандарте ANS Forth

16.6.1.1643   GET-CURRENT                                                SEARCH
           ( -- wid )
           Возвращает wid, идентификатор списка слов компиляции.

SET-CURRENT в стандарте ANS Forth

16.6.1.2195   SET-CURRENT                                                SEARCH
           ( wid -- )
           Устанавливает список слов компиляции на список слов, 
           идентифицированный wid.

История

Слово из стандарта Forth 83. Было исключено из стандарта ANS Forth в пользу механизма ALSO/ONLY.

Реализация

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

CURRENT  П->А ПЕРЕМЕННАЯ - СПИСОК ДЛЯ ДОБАВЛЕНИЯ СЛОВ           7

                      Экран номер 7
( 09.09.86 КОНСТАНТЫ И СИСТЕМНЫЕ ПЕРЕМЕННЫЕ      )

VARIABLE  CURRENT     ( ТЕКУЩИЙ СПИСОК - КУДА ДОБАВЛЯЕМ)

Определение переменной CURRENT в FORTH ИТЭФ:

            HEAD     207Q, 'CURREN',324Q,CURR,$USE        ; CURRENT
            DW 52Q

Ссылки

• Слова GET-CURRENT и SET-CURRENT в стандарте ANS Forth (англ.)
• Слова GET-CURRENT и SET-CURRENT в черновике Forth 200x (англ.)
• ФУНКЦИОНИРОВАНИЕ ФОРТ-СИСТЕМЫ в книге Л.Броуди «Начальный курс программирования на языке Форт»

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

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