Редактирование: U♯
Перейти к навигации
Перейти к поиску
Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия | Ваш текст | ||
Строка 1: | Строка 1: | ||
'''U#''' — | '''U#''' — встроенное слово [[Каллисто]]. | ||
U# ( u −− u1 ) Преобразовать в литеру последнюю цифру из u и добавить к форматной строке. | U# ( u −− u1 ) Преобразовать в литеру последнюю цифру из u и добавить к форматной строке. | ||
Преобразует одну цифру целого числа u и [[HOLD|записывает её]] в выходной буфер [[PAD]]. Выдаёт цифру всегда. Если преобразовывать нечего, записывается [[Символ 0|'0']]. | Преобразует одну цифру целого числа u и [[HOLD|записывает её]] в выходной буфер [[PAD]]. Выдаёт цифру всегда. Если преобразовывать нечего, записывается [[Символ 0|'0']]. | ||
Строка 19: | Строка 19: | ||
== История == | == История == | ||
Каллистянское слово U# — адаптированное слово # , которое | Каллистянское слово U# — адаптированное слово # , которое присутствует ещё в Форте−79. | ||
В [[Каллисто]] U# оперирует лишь с одной ячейкой на вершине [[Стек данных|стека]]. Слово U# присутствует в некоторых версиях Форта. | |||
=== # в предыдущем стандарте Forth-83 (англ.) === | === # в предыдущем стандарте Forth-83 (англ.) === | ||
Строка 47: | Строка 47: | ||
== Реализация == | == Реализация == | ||
Юрий Семёнов приводит следующее определение слова U# (стр. 100): | Юрий Семёнов приводит следующее определение слова U# (стр. 100): | ||
: U# BASE @ /MOD ROT 9 OVER < IF 7 + THEN '0' + HOLD ; | : U# BASE @ /MOD ROT 9 OVER < IF 7 + THEN '0' + HOLD ; |