Слово 1

1 (один) — встроенное слово Каллисто. Константа один.

1              ( -- 1 )                        Число 1.

Примитив 1 кладёт на стек число 1.

Ввод слова 1

В режиме NUM нажмите белую клавишу  1 

История

Ещё в раннем Форте было подмечено, что некоторые числа используются в программах чаще других. Чтобы сделать исполняемый код короче и быстрее, под такие числа были заведены отдельные слова — засылающие их в стек в обход механизма литералов. Это также ускоряет время компиляции приложения, существенный плюс для Каллисто 1.0.

Реализация

Слово 1 названо константой по его действию. В Каллисто 1.0 оно не имеет отношения к порождающему слову CONSTANT и является примитивом:

 863 JONE:                                           ; Обработчик 1
 864                 1 KM3  KGOTO9
…
2653 ;#One
2654 ; 1                ( −− 1 )                             Число 1.
2655 LONE:           .DB     1
2656                 .TEXT   "1"
2657                 .DW     LZERO
2658 ONE:            .DW     JONE

Реализация в SP-Forth 4.20

CODE 1.E
       FLD1
       RET
END-CODE

Советская реализация

У Баранова-Ноздрунова определение слова 1 выглядит так (стр. 70):

1 CONSTANT 1

Определение константы 1 в FORTH ИТЭФ:

            HEAD     201Q,,261Q,ONE,$CON                  ; 1
            DW 1

Ссылки

• Исходный текст слова 1 в Каллисто Классик 1.0
• См. слова FALSE, TRUE и 2

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