Редактирование: ⟨
Перейти к навигации
Перейти к поиску
Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия | Ваш текст | ||
Строка 1: | Строка 1: | ||
'''<''' (меньше) — стандартное слово [[Каллисто]]. | '''<''' (меньше) — стандартное слово [[Каллисто]]. | ||
< ( | < ( x1 x2 −− f ) Меньше. f равно −1 если и только если x1 меньше, чем x2. | ||
== Ввод слова < == | == Ввод слова < == | ||
В [[Режим NUM|режиме NUM]] последовательно нажмите две клавиши [[Клавиша F|{{Оранжевая клавиша|F}}]] {{ШГ→}} | В [[Режим NUM|режиме NUM]] последовательно нажмите две клавиши [[Клавиша F|{{Оранжевая клавиша|F}}]] [[Клавиша ШГ вправо|{{Чёрная клавиша|ШГ→}}]] | ||
== < и F< в стандарте ANS Forth == | == < и F< в стандарте ANS Forth == | ||
Строка 22: | Строка 22: | ||
Оно появилось в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 в 1964 году ([https://ru.wikipedia.org/wiki/%D0%9D%D0%B0%D1%86%D0%B8%D0%BE%D0%BD%D0%B0%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D1%83%D1%81%D0%BA%D0%BE%D1%80%D0%B8%D1%82%D0%B5%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D0%BB%D0%B0%D0%B1%D0%BE%D1%80%D0%B0%D1%82%D0%BE%D1%80%D0%B8%D1%8F_SLAC Национальная ускорительная лаборатория SLAC], [https://ru.wikipedia.org/wiki/%D0%A1%D1%82%D1%8D%D0%BD%D1%84%D0%BE%D1%80%D0%B4%D1%81%D0%BA%D0%B8%D0%B9_%D1%83%D0%BD%D0%B8%D0%B2%D0%B5%D1%80%D1%81%D0%B8%D1%82%D0%B5%D1%82 Стэнфордский университет]). | Оно появилось в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 в 1964 году ([https://ru.wikipedia.org/wiki/%D0%9D%D0%B0%D1%86%D0%B8%D0%BE%D0%BD%D0%B0%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D1%83%D1%81%D0%BA%D0%BE%D1%80%D0%B8%D1%82%D0%B5%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D0%BB%D0%B0%D0%B1%D0%BE%D1%80%D0%B0%D1%82%D0%BE%D1%80%D0%B8%D1%8F_SLAC Национальная ускорительная лаборатория SLAC], [https://ru.wikipedia.org/wiki/%D0%A1%D1%82%D1%8D%D0%BD%D1%84%D0%BE%D1%80%D0%B4%D1%81%D0%BA%D0%B8%D0%B9_%D1%83%D0%BD%D0%B8%D0%B2%D0%B5%D1%80%D1%81%D0%B8%D1%82%D0%B5%D1%82 Стэнфордский университет]). | ||
Вместе со словом < появилось соглашение оставлять значение истинности на стеке | Вместе со словом < появилось соглашение оставлять значение истинности на стеке, 1 для «истина» и 0 для «ложь». | ||
=== < в предыдущем стандарте Forth-83 (англ.) === | === < в предыдущем стандарте Forth-83 (англ.) === | ||
Строка 45: | Строка 45: | ||
== Реализация == | == Реализация == | ||
У Баранова-Ноздрунова приводится следующее описание слова < (стр. 26): | У Баранова-Ноздрунова приводится следующее описание слова < (стр. 26): | ||
: < ( A,B ---> A < B ) - 0< ; | : < ( A,B ---> A < B ) - 0< ; | ||
Строка 108: | Строка 66: | ||
JG TRUE | JG TRUE | ||
JMP FALSE | JMP FALSE | ||
</PRE> | </PRE> | ||
Метки TRUE и FALSE см. в определении слова [[0=]] | |||
== Ссылки == | == Ссылки == |