1+

1+ (единицу прибавить) — стандартное слово Каллисто. Прибавление 1.

1+             ( x -- x1 )

Добавляет 1 к x и кладёт на стек результат x1.

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+ выглядит так (стр. 70):

: 1+  ( A ---> A+1 )   1  +  ;

Ссылки

• См. слова 1− 2+
• Инкремент на Википедии
• Слово 1+ (one-plus) в стандарте ANS Forth (англ.)
• Слово 1+ (one-plus) в черновике Forth 200x (англ.)

У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их.

Это заготовка статьи. Вы можете помочь проекту, дополнив её.