Редактирование: ?DUP
Перейти к навигации
Перейти к поиску
Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия | Ваш текст | ||
Строка 96: | Строка 96: | ||
: ?DUP ( W->W,W| 0->0 ) DUP IF DUP THEN ; | : ?DUP ( W->W,W| 0->0 ) DUP IF DUP THEN ; | ||
</PRE> | </PRE> | ||
В FORTH ИТЭФ слово ?DUP называлось −DUP и было [[примитив]]ом, который опирался на код [[примитив]]а [[Слово ↑|DUP]], вот | В FORTH ИТЭФ слово ?DUP называлось −DUP и также было [[примитив]]ом, который опирался на код [[примитив]]а [[Слово ↑|DUP]], вот его определение: | ||
<PRE> | <PRE> | ||
HEAD 203Q,'DU',320Q,DUBL ; DUP | HEAD 203Q,'DU',320Q,DUBL ; DUP |