2DUP
2DUP (два-дублировать) — стандартное слово Каллисто. Продублировать пару чисел в стеке.
2DUP ( x1 x2 -- x1 x2 x1 x2 )
Дублирует верхнюю пару ячеек x1 x2 в стеке.
Ввод слова 2DUP
В режиме NUM последовательно нажмите клавиши 2 Р-ГРД-Г K 3 6
Для возврата в режим NUM нажмите синюю клавишу P .
2DUP в стандарте ANS Forth
6.1.0380 2DUP "two-dupe" CORE ( x1 x2 -- x1 x2 x1 x2 ) Дублирует пару-ячеек x1 x2.
2DUP в предыдущем стандарте Forth-83 (англ.)
2DUP 32b -- 32b 32b 79 "two-dupe" Duplicate 32b.
2DUP в стандарте Forth-79 (англ.)
2DUP d -- d d "two-dupe" Duplicate the top double number on the stack.
Заметки
В Каллисто 2DUP реализован, как примитив. Но при необходимости 2DUP можно легко выразить через OVER:
: 2DUP ( x1 x2 -- x1 x2 x1 x2) OVER OVER ;
История
2DUP — устоявшееся слово в Форте, название и поведение которого не менялось с 1979 года.
Ссылки
- См. слова ↑, 2DROP, 2SWAP
- Слово 2DUP (two-dupe) в стандарте ANS Forth (англ.)
- Слово 2DUP (two-dupe) в черновике Forth 200x (англ.)
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |