Редактирование: CURRENT

Перейти к навигации Перейти к поиску
Внимание: Вы не вошли в систему. Ваш IP-адрес будет общедоступен, если вы запишете какие-либо изменения. Если вы войдёте или создадите учётную запись, её имя будет использоваться вместо IP-адреса, наряду с другими преимуществами.

Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.

Текущая версия Ваш текст
Строка 1: Строка 1:
'''CURRENT''' (текущий) — фортовская переменная [[Каллисто]].
'''CURRENT''' (текущий) — стандартное слово [[Каллисто]].
CURRENT        ( −− a )                            Переменная, текущий пополняемый набор слов.
Переменная указывает [[VOCABULARY|набор слов]], в который добавляются определения новых слов.


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


== Ввод слова CURRENT ==
В [[Режим ЛАТ|режиме ЛАТ]] последовательно нажмите клавиши [[Клавиша С/П|{{Чёрная клавиша|С/П}}]] [[Клавиша 3|{{Серая клавиша|3}}]] [[Клавиша ×|{{Серая клавиша|×}}]] [[Клавиша ×|{{Серая клавиша|×}}]] [[Клавиша ИП|{{Чёрная клавиша|ИП}}]] [[Клавиша 4|{{Серая клавиша|4}}]] [[Клавиша 2|{{Серая клавиша|2}}]]


== GET-CURRENT и SET-CURRENT в стандарте ANS Forth ==
== CURRENT в предыдущем стандарте Forth-83 (англ.) ==
<PRE>
      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
  16.6.1.1643  GET-CURRENT                                                SEARCH
             ( -- wid )
             ( -- wid )
             Возвращает wid, идентификатор списка слов компиляции.
             Возвращает wid, идентификатор списка слов компиляции.


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


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


=== 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.
== Реализация ==
<pre>
  93 rrCURRENT      .EQU    1106                  ; 11106  CURRENT − Указатель, к какому словарю будет отнесено новое слово
  94 pCURRENT        .EQU      106
  95 rlCURRENT      .EQU    1107
…
2849 ;#CURRENT
2850 ; CURRENT          ( −− a )                            Переменная, текущий пополняемый список слов.
2851 LCURRENT:      .DB    7
2852                .TEXT  "CURRENT"
2853                .DW    LCONTEXT
2854 CURR:          .DW    SUSE
2855                .DB pCURRENT                    ; Переменная указывает список слов, в который вводятся определения новых слов.
</pre>
Реализация из SP-Forth 4.20:
<pre>
  USER CURRENT    \ дает wid текущего словаря компиляции
…
: SET-CURRENT ( wid -- ) \ 94 SEARCH
\ Установить список компиляции на список, идентифицируемый wid.
  CURRENT !
;
: GET-CURRENT ( -- wid ) \ 94 SEARCH
\ Возвращает wid - идентификатор списка компиляции.
  CURRENT @
;
</pre>
=== Советская реализация ===
Описание и определение переменной CURRENT в ядре ФОРТ-ЕС:
<PRE>
CURRENT  П->А ПЕРЕМЕННАЯ - СПИСОК ДЛЯ ДОБАВЛЕНИЯ СЛОВ          7
                      Экран номер 7
( 09.09.86 КОНСТАНТЫ И СИСТЕМНЫЕ ПЕРЕМЕННЫЕ      )
VARIABLE  CURRENT    ( ТЕКУЩИЙ СПИСОК - КУДА ДОБАВЛЯЕМ)
</PRE>
Определение переменной CURRENT в FORTH ИТЭФ:
<PRE>
            HEAD    207Q, 'CURREN',324Q,CURR,$USE        ; CURRENT
            DW 52Q
</PRE>


== Ссылки ==
== Ссылки ==
* {{Исходник|CURRENT|CURRENT}}
* [http://forth.sourceforge.net/standard/dpans/dpans16.htm#16.6.1.1643 Слово GET-CURRENT в стандарте ANS Forth] ''(англ.)''
* Слова [http://forth.sourceforge.net/standard/dpans/dpans16.htm#16.6.1.1643 GET-CURRENT] и [http://forth.sourceforge.net/standard/dpans/dpans16.htm#16.6.1.2195 SET-CURRENT] в стандарте ANS Forth ''(англ.)''
* [http://forth.sourceforge.net/standard/dpans/dpans16.htm#16.6.1.2195 Слово SET-CURRENT в стандарте ANS Forth] ''(англ.)''
* Слова [http://forth-standard.org/standard/search/GET-CURRENT GET-CURRENT] и [http://forth-standard.org/standard/search/SET-CURRENT SET-CURRENT] в черновике Forth 200x ''(англ.)''
* [http://www.forth200x.org/documents/html/search.html#search:GET-CURRENT Слово GET-CURRENT в черновике Forth 200x] ''(англ.)''
* [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH\09.FUNKZIONIROWANIE%20FORT-SISTEMY ФУНКЦИОНИРОВАНИЕ ФОРТ-СИСТЕМЫ] в книге [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH Л.Броуди «Начальный курс программирования на языке Форт»]
* [http://www.forth200x.org/documents/html/search.html#search:SET-CURRENT Слово SET-CURRENT в черновике Forth 200x] ''(англ.)''




Строка 88: Строка 42:
{{заготовка}}
{{заготовка}}
[[Категория:Слова Каллисто]]
[[Категория:Слова Каллисто]]
[[Категория:Переменные USER]]
[[Категория:Стандартные переменные Каллисто]]
[[Категория:Встроенные переменные Каллисто]]
[[Категория:Управление поиском слов Каллисто]]
[[Категория:Управление поиском слов]]
[[Категория:Фортовские слова]]
Пожалуйста, учтите, что любой ваш вклад в проект «ПМК вики» может быть отредактирован или удалён другими участниками. Если вы не хотите, чтобы кто-либо изменял ваши тексты, не помещайте их сюда.
Вы также подтверждаете, что являетесь автором вносимых дополнений, или скопировали их из источника, допускающего свободное распространение и изменение своего содержимого (см. Pmkwiki:Авторские права). НЕ РАЗМЕЩАЙТЕ БЕЗ РАЗРЕШЕНИЯ ОХРАНЯЕМЫЕ АВТОРСКИМ ПРАВОМ МАТЕРИАЛЫ!

В целях защиты вики от автоматического спама в правках просим вас решить следующую каптчу:

Отменить Справка по редактированию (в новом окне)

Шаблоны, используемые на этой странице:

Источник — https://pmk.the-hacker.ru/CURRENT