1+
1+ (увеличить, единицу прибавить, читается «один-плюс») — стандартное слово Каллисто. Прибавление 1.
1+ ( x -- x1 ) Увеличить. x1 ← x + 1
Добавляет 1 к x и кладёт на стек результат x1.
Ввод слова 1+
В режиме NUM последовательно нажмите две белые клавиши 1 +
1+ в стандарте ANS Forth
6.1.0290 1+ "one-plus" CORE ( n1|u1 -- n2|u2 ) Прибавляет один(1) к n1|u1 возвращает сумму n2|u2.
1+ в предыдущем стандарте Forth-83 (англ.)
1+ w1 -- w2 79 "one-plus" w2 is the result of adding one to w1 according to the operations of + .
1+ в стандарте Forth-79 (англ.)
1+ n -- n+1 107 "one-plus" Increment n by one, according to the operation of + .
1+ в fig-FORTH Release 1 glossary, май 1979 (англ.)
1+ n1 --- n2 L1 Increment n1 by l.
История
Каллистянское слово 1+ способно увеличивать на 1 не только целые, но и числа с плавающей запятой.
Реализация 1+
У Баранова-Ноздрунова определение слова 1+ выглядит так (стр. 70):
: 1+ ( A ---> A+1 ) 1 + ;
Описание и определение слова 1+ в ядре ФОРТ-ЕС:
1+ W1->W2 УВЕЛИЧИТЬ W1 НА 1 17 Экран номер 17 ( 31.03.86 NEGATE ABS + - 1+ 1- 2+ 2- +! 1+! ) : 1+ ( W1->W2) 1 + ;
Ссылки
- См. слова +,1− и 2+
- См. символ +
- Инкремент на Википедии
- Слово 1+ (one-plus) в стандарте ANS Forth (англ.)
- Слово 1+ (one-plus) в черновике Forth 200x (англ.)
- ОПЕРАЦИИ НАД ЦЕЛЫМИ ЧИСЛАМИ в книге Л.Броуди «Начальный курс программирования на языке Форт»
- The Philosophy of Fixed Point в книге Leo Brodie Starting Forth (англ.)
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |