Внимание: Вы не вошли в систему. Ваш IP-адрес будет общедоступен, если вы запишете какие-либо изменения. Если вы
войдёте или
создадите учётную запись, её имя будет использоваться вместо IP-адреса, наряду с другими преимуществами.
Правка может быть отменена.
Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия |
Ваш текст |
Строка 23: |
Строка 23: |
|
| |
|
| == Реализация == | | == Реализация == |
| <pre>
| |
| 145 rrDP .EQU 1137 ; 11137 H − Указатель на первую свободную ячейку словаря H @ = HERE
| |
| 146 pDP .EQU 137
| |
| 147 rlDP .EQU 1138
| |
| …
| |
| 2774 ;#H
| |
| 2775 ; H ( −− a ) Переменная, адрес вершины словаря.
| |
| 2776 LDP: .DB 1
| |
| 2777 .TEXT "H"
| |
| 2778 .DW LDDP
| |
| 2779 DP: .DW SUSE
| |
| 2780 .DB pDP
| |
| </pre>
| |
|
| |
| === Реализация в SP-Forth 4.20 ===
| |
| <pre>
| |
| VARIABLE (DP) \ переменная, содержащая HERE сегмента данных
| |
| …
| |
| : DP ( -- addr ) \ переменная, содержащая HERE сегмента данных
| |
| IS-TEMP-WL
| |
| IF GET-CURRENT 7 CELLS + ELSE (DP) THEN
| |
| ;
| |
| </pre>
| |
|
| |
| === Советская реализация ===
| |
| В ФОРТ-ЕС вместо переменной '''H''' использовался [[примитив]] DP! | | В ФОРТ-ЕС вместо переменной '''H''' использовался [[примитив]] DP! |
|
| |
|
Строка 82: |
Строка 57: |
| [[Категория:Встроенные переменные Каллисто]] | | [[Категория:Встроенные переменные Каллисто]] |
| [[Категория:Работа со словарём Каллисто]] | | [[Категория:Работа со словарём Каллисто]] |
| [[Категория:Фортовские слова]]
| |