PICK: различия между версиями
Перейти к навигации
Перейти к поиску
AtH (обсуждение | вклад) Нет описания правки |
AtH (обсуждение | вклад) Нет описания правки |
||
Строка 17: | Строка 17: | ||
A.6.2.2030 PICK | A.6.2.2030 PICK | ||
0 PICK эквивалентно DUP, и 1 PICK эквивалентно OVER. | 0 PICK эквивалентно DUP, и 1 PICK эквивалентно OVER. | ||
== PICK в предыдущем стандарте Forth-83 (англ.) == | == PICK в предыдущем стандарте Forth-83 (англ.) == | ||
Строка 25: | Строка 24: | ||
0 PICK is equivalent to DUP | 0 PICK is equivalent to DUP | ||
1 PICK is equivalent to OVER | 1 PICK is equivalent to OVER | ||
== PICK в стандарте Forth-79 (англ.) == | == PICK в стандарте Forth-79 (англ.) == | ||
Строка 32: | Строка 30: | ||
itself. An error condition results for n less than one. | itself. An error condition results for n less than one. | ||
2 PICK is equivalent to OVER. {1..n} | 2 PICK is equivalent to OVER. {1..n} | ||
== История == | == История == | ||
Строка 47: | Строка 44: | ||
{{заготовка}} | {{заготовка}} | ||
[[Категория:Слова Каллисто]] | [[Категория:Слова Каллисто]] | ||
[[Категория:Примитивы]] | |||
[[Категория:Стековые манипуляции Каллисто]] | [[Категория:Стековые манипуляции Каллисто]] | ||
[[Категория:Описание бета-версии Каллисто]] | [[Категория:Описание бета-версии Каллисто]] |
Версия от 14:32, 19 марта 2016
PICK (взять, читается «пик») — стандартное слово Каллисто. Продублировать u-ное сверху значение.
PICK ( xu ... x1 x0 u -- xu ... x1 x0 xu ) Дублировать u-ное сверху.
Удаляет u. Копирует элемент стека с номером u (считая от нуля, само число u при этом не считается) и записывает его наверх стека.
Ввод слова PICK
В режиме ЛАТ последовательно нажмите четыре клавиши 6 7 С/П 9
Детали реализации
Верхний элемент стека имеет номер нуль, так что 0 PICK равносильно ↑, а 1 PICK равносильно OVER.
PICK в стандарте ANS Forth
6.2.2030 PICK CORE EXT ( xu ... x1 x0 u -- xu ... x1 x0 xu ) Удаляет u. Копирует xu на вершину стека. Неопределенная ситуация существует, если до выполнения PICK на стеке меньше u+2 элементов.
A.6.2.2030 PICK 0 PICK эквивалентно DUP, и 1 PICK эквивалентно OVER.
PICK в предыдущем стандарте Forth-83 (англ.)
PICK +n -- 16b 83 16b is a copy of the +nth stack value, not counting +n itself. {0..the number of elements on stack-1} 0 PICK is equivalent to DUP 1 PICK is equivalent to OVER
PICK в стандарте Forth-79 (англ.)
PICK n1 -- n2 240 Return the contents of the n1-th stack value, not counting n1 itself. An error condition results for n less than one. 2 PICK is equivalent to OVER. {1..n}
История
В Форте-83 действие слова PICK подверглось кардинальному изменению.
В Каллисто слово PICK совместимо с версией Форта-83 и последующими. В программах, написанных для Форта-79 и более ранних версий, слово PICK надо заменять на последовательность 1− PICK
Ссылки
- Слово PICK и комментарий к нему в стандарте ANS Forth (англ.)
- Слово PICK и комментарий к нему в черновике Forth 200x (англ.)
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |