⟩RESOLVE: различия между версиями
Перейти к навигации
Перейти к поиску
AtH (обсуждение | вклад) Нет описания правки |
AtH (обсуждение | вклад) Нет описания правки |
||
Строка 16: | Строка 16: | ||
using addr and places this branch address into the space | using addr and places this branch address into the space | ||
left by >MARK . | left by >MARK . | ||
== Реализация == | |||
Определение слова >RESOLVE в ядре ФОРТ-ЕС: | |||
<PRE> | |||
Экран номер 19 | |||
( 31,03.86 CPАBHEHИЯ И РАЗРЕШЕНИЯ В ШИТОМ КОДЕ) | |||
: >RESOLVE ( A->) HERE SWAP ! ; | |||
</PRE> | |||
Версия от 04:40, 26 марта 2016
>RESOLVE (разрешить) — стандартное слово Каллисто.
Разрешить ссылку вперёд в адресе a.
Слово >RESOLVE ( A ---> ) снимает адрес, занесённый словом >MARK, со стека и вписывает в него ссылку на текущую вершину словаря в соответствии с принятой реализацией переходов в шитом коде, согласованной с реализацией BRANCH и ?BRANCH
Ввод слова >RESOLVE
В режиме NUM последовательно нажмите клавиши F ИП Р-ГРД-Г × ИП 1 5 − ↔ ИП
Для возврата в режим NUM нажмите синюю клавишу P .
>RESOLVE в предыдущем стандарте Forth-83 (англ.)
>RESOLVE addr -- C,83 "forward-resolve" Used at the destination of a forward branch. Calculates the branch address (to the current location in the dictionary) using addr and places this branch address into the space left by >MARK .
Реализация
Определение слова >RESOLVE в ядре ФОРТ-ЕС:
Экран номер 19 ( 31,03.86 CPАBHEHИЯ И РАЗРЕШЕНИЯ В ШИТОМ КОДЕ) : >RESOLVE ( A->) HERE SWAP ! ;
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |