0⟩

0> (нуля больше) — стандартное слово Каллисто. Проверить, положительное ли число.

0>             ( x -- f )                      Проверка на положительность.

Сравнивает x с нулём и засылает в стек флаг «истинно» (f=-1), если x>0 и флаг «ложно» (f=0), если x≤0.

Ввод слова 0>

В режиме NUM последовательно нажмите три клавиши  0     F   ИП 

Детали реализации

Слово 0> в качестве флага «истинно» возвращает -1, что позволяет использовать результат f в логических операция AND, OR, XOR и NOT. Разумеется, при этом другие аргументы этих операций тоже должны использовать -1 в качестве флага «истинно». Все слова Каллисто, возвращающие флаги, используют в качестве флага «истинно» -1.

0> в стандарте ANS Forth

6.2.0280   0>                          "zero-greater"                  CORE EXT
           ( n -- flag )
           flag - true, если и только если n - больше нуля.

0> в предыдущем стандарте Forth-83 (англ.)

     0>           n -- flag                     83      "zero-greater"
          flag is true if n is greater than zero.

0> в стандарте Forth-79 (англ.)

0>             n -- flag                     118     "zero-greater"
    True if n is greater than zero.

Ссылки

• См. слова 0= 0<
• Слово 0> (zero-greater) в стандарте ANS Forth (англ.)
• Слово 0> (zero-greater) в черновике Forth 200x (англ.)

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

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