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 (англ.)
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |