VOC-LINK: различия между версиями
Перейти к навигации
Перейти к поиску
AtH (обсуждение | вклад) (Новая страница: «'''VOCL''' — стандартное слово Каллисто. {{нет иллюстраций}} {{заготовка}} Категория:Слова…») |
AtH (обсуждение | вклад) |
||
| (не показаны 23 промежуточные версии этого же участника) | |||
| Строка 1: | Строка 1: | ||
''' | '''VOC-LINK''' — фортовская переменная [[Каллисто]]. | ||
VOC−LINK ( −− a ) Переменная связи, начало списка из наборов слов. | |||
Переменная связи [[VOCABULARY|наборов слов]]. | |||
== Ввод слова VOC-LINK == | |||
В [[Режим ЛАТ|режиме ЛАТ]] последовательно нажмите клавиши [[Клавиша ↔|{{Серая клавиша|↔}}]] [[Клавиша 5|{{Серая клавиша|5}}]] [[Клавиша С/П|{{Чёрная клавиша|С/П}}]] [[Клавиша P|{{Синяя клавиша|P}}]] [[Клавиша -|{{Серая клавиша|−}}]] [[Клавиша Р-ГРД-Г|{{Чёрная клавиша|Р-ГРД-Г}}]] [[Клавиша -|{{Серая клавиша|−}}]] [[Клавиша 7|{{Серая клавиша|7}}]] [[Клавиша 4|{{Серая клавиша|4}}]] [[Клавиша 9|{{Серая клавиша|9}}]] | |||
== VOC-LINK в fig-FORTH Release 1 glossary, май 1979 (англ.) == | |||
VOC-LINK --- addr U | |||
A user variable containing the address of a field in the definition | |||
of the most recently created vocabulary. All vocabulary names are | |||
linked by these fields to allow control for FORGETting thru multiple | |||
vocabularies. | |||
== Реализация == | |||
<pre> | |||
148 rrVOCLINK .EQU 1139 ; 11139 VOC−LINK − Переменная связи наборов слов | |||
149 pVOCLINK .EQU 139 | |||
… | |||
2782 ;#VOC−LINK | |||
2783 ; VOC−LINK ( −− a ) Переменная связи, начало списка из наборов слов. | |||
2784 LVOCLINK: .DB 8 | |||
2785 .TEXT "VOC−LINK" | |||
2786 .DW LDP | |||
2787 VOCLINK: .DW SUSE | |||
2788 .DB pVOCLINK | |||
</pre> | |||
Реализации из SP-Forth 4.20: | |||
<pre> | |||
VECT VOC-LIST | |||
VARIABLE _VOC-LIST ' _VOC-LIST TO VOC-LIST | |||
</pre> | |||
<pre> | |||
VARIABLE VOC-LIST \ список словарей | |||
' VOC-LIST EXECUTE 0! | |||
</pre> | |||
<pre> | |||
_VOC-LIST @ \ готовая цепочка | |||
VARIABLE _VOC-LIST \ список словарей | |||
' _VOC-LIST TC-ADDR! \ запись уже созданной цепочки | |||
' _VOC-LIST TO VOC-LIST \ исправление в tc | |||
VECT VOC-LIST \ точка для модификаций | |||
' _VOC-LIST ' VOC-LIST TC-VECT! \ начальное значение | |||
</pre> | |||
=== Советская реализация === | |||
Описание и определение слова VOC-LINK в ядре ФОРТ-ЕС: | |||
<PRE> | |||
VOC-LINK *П ->А ПЕРЕМЕННАЯ - АДРЕС ПОЛЯ СВЯЗИ ПОСЛЕДНЕГО 33 | |||
СОЗДАННОГО ПО "VOCABULARY" СПИСКА СЛОВ | |||
Экран номер 33 | |||
( 09.09.86 FORTH FORTH# FL# VOC-LINK VOCABULARY VOCABULARY#) | |||
VOC FORTH &DWORD H, ( FORTH-83) | |||
A: FORTH# LASTWORD ( ВХОД В СПИСОК СЛОВАРНЫХ СТАТЕЙ) | |||
A: FL# 0 Н, ( ПОЛЕ СВЯЗИ ДЛЯ СПИСКОВ СТАТЕЙ) | |||
CREATE VOC-LINK FL# ( ВХОД В СПИСОК СПИСКОВ СТАТЕЙ) | |||
</PRE> | |||
В FORTH ИТЭФ слово VOC-LINK называлось VOCL, вот его описание и определение: | |||
<PRE> | |||
HEAD 204Q,'VOC',314Q,VOCL,$USE ; VOCL | |||
DW 24Q | |||
… | |||
HEAD 305Q,'FORT',310Q,FORTH,$DOE ; FORTH | |||
DW DOVOC,120201Q,TASK-7 | |||
XVOC LABEL FAR | |||
DW 0 | |||
</PRE> | |||
== Ссылки == | |||
* {{Исходник|VOCLINK|VOC-LINK}} | |||
{{нет иллюстраций}} | {{нет иллюстраций}} | ||
{{заготовка}} | {{заготовка}} | ||
[[Категория:Слова Каллисто]] | [[Категория:Слова Каллисто]] | ||
[[Категория:Переменные USER]] | |||
[[Категория:Встроенные переменные Каллисто]] | |||
[[Категория:Управление поиском слов]] | |||
Текущая версия от 00:02, 14 ноября 2017
VOC-LINK — фортовская переменная Каллисто.
VOC−LINK ( −− a ) Переменная связи, начало списка из наборов слов.
Переменная связи наборов слов.
Ввод слова VOC-LINK[править]
В режиме ЛАТ последовательно нажмите клавиши ↔ 5 С/П P − Р-ГРД-Г − 7 4 9
VOC-LINK в fig-FORTH Release 1 glossary, май 1979 (англ.)[править]
VOC-LINK --- addr U
A user variable containing the address of a field in the definition
of the most recently created vocabulary. All vocabulary names are
linked by these fields to allow control for FORGETting thru multiple
vocabularies.
Реализация[править]
148 rrVOCLINK .EQU 1139 ; 11139 VOC−LINK − Переменная связи наборов слов 149 pVOCLINK .EQU 139 … 2782 ;#VOC−LINK 2783 ; VOC−LINK ( −− a ) Переменная связи, начало списка из наборов слов. 2784 LVOCLINK: .DB 8 2785 .TEXT "VOC−LINK" 2786 .DW LDP 2787 VOCLINK: .DW SUSE 2788 .DB pVOCLINK
Реализации из SP-Forth 4.20:
VECT VOC-LIST VARIABLE _VOC-LIST ' _VOC-LIST TO VOC-LIST
VARIABLE VOC-LIST \ список словарей ' VOC-LIST EXECUTE 0!
_VOC-LIST @ \ готовая цепочка VARIABLE _VOC-LIST \ список словарей ' _VOC-LIST TC-ADDR! \ запись уже созданной цепочки ' _VOC-LIST TO VOC-LIST \ исправление в tc VECT VOC-LIST \ точка для модификаций ' _VOC-LIST ' VOC-LIST TC-VECT! \ начальное значение
Советская реализация[править]
Описание и определение слова VOC-LINK в ядре ФОРТ-ЕС:
VOC-LINK *П ->А ПЕРЕМЕННАЯ - АДРЕС ПОЛЯ СВЯЗИ ПОСЛЕДНЕГО 33
СОЗДАННОГО ПО "VOCABULARY" СПИСКА СЛОВ
Экран номер 33
( 09.09.86 FORTH FORTH# FL# VOC-LINK VOCABULARY VOCABULARY#)
VOC FORTH &DWORD H, ( FORTH-83)
A: FORTH# LASTWORD ( ВХОД В СПИСОК СЛОВАРНЫХ СТАТЕЙ)
A: FL# 0 Н, ( ПОЛЕ СВЯЗИ ДЛЯ СПИСКОВ СТАТЕЙ)
CREATE VOC-LINK FL# ( ВХОД В СПИСОК СПИСКОВ СТАТЕЙ)
В FORTH ИТЭФ слово VOC-LINK называлось VOCL, вот его описание и определение:
HEAD 204Q,'VOC',314Q,VOCL,$USE ; VOCL
DW 24Q
…
HEAD 305Q,'FORT',310Q,FORTH,$DOE ; FORTH
DW DOVOC,120201Q,TASK-7
XVOC LABEL FAR
DW 0
Ссылки[править]
|
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
|
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |