Слово +: различия между версиями
AtH (обсуждение | вклад) Нет описания правки |
AtH (обсуждение | вклад) |
||
(не показано 86 промежуточных версий этого же участника) | |||
Строка 1: | Строка 1: | ||
'''+''' — стандартное слово [[Каллисто]]. | '''+''' (сложить, читается «плюс») — стандартное слово [[Каллисто]]. Сложение [[Десятичное число|десятичных чисел]]. | ||
+ ( y x -- x1 ) Сложить. x1 ← y + x | |||
[[Файл:CallistoMag.png|thumb|right|264px|Пример работы слова +]] | |||
Слово + добавляет x к y и кладёт на [[Стек данных|стек]] сумму x1. | |||
== Ввод слова + == | |||
В [[Режим NUM|режиме NUM]] нажмите [[Клавиша +|белую клавишу {{Серая клавиша|+}}]] | |||
== + и F+ в стандарте ANS Forth == | |||
<PRE> | |||
6.1.0120 + "plus" CORE | |||
( n1|u1 n2|u2 -- n3|u3 ) | |||
Прибавляет n2|u2 к n1|u1, возвращая сумму n3|u3. | |||
См.: 3.3.3.1 Выравнивание адреса. | |||
12.6.1.1420 F+ "f-plus" FLOATING | |||
( F: r1 r2 -- r3 ) or ( r1 r2 -- r3 ) | |||
Прибавляет r1 к r2, возвращает сумму r3. | |||
</PRE> | |||
== История == | |||
Каллистянское слово + является одновременно и стандартным, входя в обязательный список слов CORE Форта-94, и традиционным — присутствуя во входных языках калькуляторов ещё со времён [[Б3-34]] и [[Электроника Б3-21|Б3-21]]. | |||
В Форте слово + является одним из самых древних сохранившихся слов. Также каллистянское слово + выполняет функции слова F+ из действующего стандарта Форта 1994 года. | |||
Слово + появилось в программе CURVE, написанной Чак Муром на [https://ru.wikipedia.org/wiki/%D0%90%D0%BB%D0%B3%D0%BE%D0%BB Алголе] для 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 Стэнфордского университета]. | |||
В 1970 году слово + работало в 2К×48бит версии Форта на Burroughs B-5500. | |||
Одноимённая [[+|команда +]] использовалась в советских ПМК, откуда в 2007 году перешла в систему команд ЭКВМ. Сам знак «+» для обозначения операции сложения взят из арифметики. Впервые знак «+» появился в 1489 году, в учебнике «Быстрый и приятный счёт для всех торговцев» немецкого математика [https://ru.wikipedia.org/wiki/%D0%92%D0%B8%D0%B4%D0%BC%D0%B0%D0%BD,_%D0%98%D0%BE%D0%B3%D0%B0%D0%BD%D0%BD Иоганна Видмана], как упрощение латинского слова «et» (союз «и»). До 1489 года сложение обозначали [[Символ с кодом 112|латинской буквой p]] (plus), часто помечая эту букву [[~|тильдой]]. | |||
=== + в предыдущем стандарте Forth-83 (англ.) === | |||
+ w1 w2 -- w3 79 "plus" | |||
w3 is the arithmetic sum of w1 plus w2. | |||
=== + в стандарте Forth-79 (англ.) === | |||
+ n1 n2 -- n3 121 "plus" | |||
Leave the arithmetic sum of n1 plus n2. | |||
=== + в fig-FORTH Release 1 glossary, май 1979 (англ.) === | |||
+ n1 n2 --- sum L0 | |||
Leave the sum of n1+n2. | |||
== Реализация == | |||
Слово + является «обёрткой» вокруг команды ЭКВМ [[+]], вызывающей переполнение при результате, по модулю больше либо равном 10<sup>100</sup>. | |||
Обработка этой ошибки производится [[Встроенная программа|встроенной программой]]. Например, последовательность слов {{Текст на индикаторе|5E99 ↑ +}} вызывает [[аварийный останов]] [[Каллисто]] с сообщением «Переполнение» в [[Строка комментариев|строке комментариев]]. Можно ввести с клавиатуры произвольное число в качестве значения «10<sup>100</sup>» и вернуться в [[Каллисто]], нажав [[Клавиша С/П|{{Чёрная клавиша|С/П}}]]. Подробнее см. статью [[Авост Каллисто]]. | |||
В случае [[Авост Каллисто|аварийного останова]] рекомендуется произвести [[COLD|«холодную перезагрузку»]] [[Каллисто]] с удалением всех введённых слов, нажав последовательно клавиши [[Клавиша В/О|{{Чёрная клавиша|В/О}}]] [[Клавиша С/П|{{Чёрная клавиша|С/П}}]]. | |||
Слово + также может использоваться для сложения целых чисел, как в Форте. В этом случае сумма x1 — также целое число, если её модуль не превышает 10<sup>12</sup>. | |||
<pre> | |||
1329 ;#Plus | |||
1330 ; + ( y x −− x1 ) Сложить. x1 := y+x | |||
1331 LPLUS: .DB 1 | |||
1332 .TEXT "+" ; ( a b −− a+b ) | |||
1333 .DW LFDIV2 | |||
1334 PLUS: .DW JPLUS ; Сложение. | |||
1335 JPLUS: RM3 MB 1 + MA M3 | |||
1336 KRMA KRMB + KMA ; Обёртка вокруг + | |||
1337 KGOTO9 | |||
</pre> | |||
Реализации из SP-Forth 4.20: | |||
<pre> | |||
CODE + ( n1|u1 n2|u2 -- n3|u3 ) \ 94 | |||
\ Сложить n1|u1 и n2|u2 и получить сумму n3|u3. | |||
ADD EAX, [EBP] | |||
LEA EBP, 4 [EBP] | |||
RET | |||
END-CODE | |||
</pre> | |||
<pre> | |||
CODE F+ \ DE C1 | |||
FADDP ST(1), ST | |||
RET | |||
END-CODE | |||
</pre> | |||
=== Советская реализация === | |||
Слово + в ФОРТ-ЕС и FORTH ИТЭФ было [[примитив]]ом и работало только с целыми числами. Вот его описание и определение в ФОРТ-ЕС: | |||
<PRE> | |||
+ W1,W2->W3 СУММА ЧИСЕЛ W1 И W2 17 | |||
Экран номер 17 | |||
( 31.03.86 NEGATE ABS + - 1+ 1- 2+ 2- +! 1+! ) | |||
CODE + 14 LHRW12 BAL, RW1 RW2 AR, POPPUT1 В, END-CODE | |||
</PRE> | |||
Определение слова + в FORTH ИТЭФ: | |||
<PRE> | |||
HEAD 201Q,,253Q,PLUS ; + | |||
POP AX | |||
POP CX | |||
ADD AX, CX | |||
PUSH AX | |||
NEXT | |||
</PRE> | |||
== Ссылки == | == Ссылки == | ||
* [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.0120 | * {{Исходник|Plus|+}} | ||
* См. слова [[Слово −|−]], [[1+]], [[2+]], [[+!]], [[Слово ×|×]], [[Слово ÷|÷]] | |||
* См. также [[символ +]] | |||
* См. статьи [http://ru.wikipedia.org/wiki/%D0%A1%D0%BB%D0%BE%D0%B6%D0%B5%D0%BD%D0%B8%D0%B5 «Сложение»] и [https://ru.wikipedia.org/wiki/%D0%9F%D0%BB%D1%8E%D1%81 «Плюс»] на Википедии | |||
* См. слова [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.0120 + (plus)] и [http://forth.sourceforge.net/standard/dpans/dpans12.htm#12.6.1.1420 F+ (f-plus)] в стандарте ANS Forth ''(англ.)'' | |||
* См. также слова [http://forth-standard.org/standard/core/Plus + (plus)] и [http://forth-standard.org/standard/float/FPlus F+ (f-plus)] в черновике Forth 200x ''(англ.)'' | |||
* См. слово + в главах [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH\01.OSNOWY%20FORTA «Основы Форта»] и [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH\02.WYPOLNENIE%20ARIFMETITESKIH%20OPERAZIJ «Выполнение арифметических операций»] книги [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH Л.Броуди «Начальный курс программирования на языке Форт»] | |||
* См. также слово + в главах [http://www.forth.com/starting-forth/sf1/sf1.html «Fundamental Forth»] и [http://www.forth.com/starting-forth/sf2/sf2.html «How to Get Results»] книги [http://www.forth.com/starting-forth/ Leo Brodie «Starting Forth»] ''(англ.)'' | |||
[[Категория:Слова Каллисто]] | [[Категория:Слова Каллисто]] | ||
[[Категория:Примитивы]] | |||
[[Категория:Арифметические операции Каллисто]] | [[Категория:Арифметические операции Каллисто]] | ||
[[Категория:Слова, способные вызывать авост Каллисто]] | |||
[[Категория:Традиционные слова]] | |||
[[Категория:Стандартные слова]] | |||
[[Категория:1994 CORE]] | |||
[[Категория:2012 CORE]] |
Текущая версия от 17:33, 10 ноября 2017
+ (сложить, читается «плюс») — стандартное слово Каллисто. Сложение десятичных чисел.
+ ( y x -- x1 ) Сложить. x1 ← y + x
Слово + добавляет x к y и кладёт на стек сумму x1.
Ввод слова +[править]
В режиме NUM нажмите белую клавишу +
+ и F+ в стандарте ANS Forth[править]
6.1.0120 + "plus" CORE ( n1|u1 n2|u2 -- n3|u3 ) Прибавляет n2|u2 к n1|u1, возвращая сумму n3|u3. См.: 3.3.3.1 Выравнивание адреса. 12.6.1.1420 F+ "f-plus" FLOATING ( F: r1 r2 -- r3 ) or ( r1 r2 -- r3 ) Прибавляет r1 к r2, возвращает сумму r3.
История[править]
Каллистянское слово + является одновременно и стандартным, входя в обязательный список слов CORE Форта-94, и традиционным — присутствуя во входных языках калькуляторов ещё со времён Б3-34 и Б3-21.
В Форте слово + является одним из самых древних сохранившихся слов. Также каллистянское слово + выполняет функции слова F+ из действующего стандарта Форта 1994 года.
Слово + появилось в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 в 1964 году при работе на Национальную ускорительную лабораторию SLAC Стэнфордского университета.
В 1970 году слово + работало в 2К×48бит версии Форта на Burroughs B-5500.
Одноимённая команда + использовалась в советских ПМК, откуда в 2007 году перешла в систему команд ЭКВМ. Сам знак «+» для обозначения операции сложения взят из арифметики. Впервые знак «+» появился в 1489 году, в учебнике «Быстрый и приятный счёт для всех торговцев» немецкого математика Иоганна Видмана, как упрощение латинского слова «et» (союз «и»). До 1489 года сложение обозначали латинской буквой p (plus), часто помечая эту букву тильдой.
+ в предыдущем стандарте Forth-83 (англ.)[править]
+ w1 w2 -- w3 79 "plus" w3 is the arithmetic sum of w1 plus w2.
+ в стандарте Forth-79 (англ.)[править]
+ n1 n2 -- n3 121 "plus" Leave the arithmetic sum of n1 plus n2.
+ в fig-FORTH Release 1 glossary, май 1979 (англ.)[править]
+ n1 n2 --- sum L0 Leave the sum of n1+n2.
Реализация[править]
Слово + является «обёрткой» вокруг команды ЭКВМ +, вызывающей переполнение при результате, по модулю больше либо равном 10100.
Обработка этой ошибки производится встроенной программой. Например, последовательность слов 5E99 ↑ + вызывает аварийный останов Каллисто с сообщением «Переполнение» в строке комментариев. Можно ввести с клавиатуры произвольное число в качестве значения «10100» и вернуться в Каллисто, нажав С/П . Подробнее см. статью Авост Каллисто.
В случае аварийного останова рекомендуется произвести «холодную перезагрузку» Каллисто с удалением всех введённых слов, нажав последовательно клавиши В/О С/П .
Слово + также может использоваться для сложения целых чисел, как в Форте. В этом случае сумма x1 — также целое число, если её модуль не превышает 1012.
1329 ;#Plus 1330 ; + ( y x −− x1 ) Сложить. x1 := y+x 1331 LPLUS: .DB 1 1332 .TEXT "+" ; ( a b −− a+b ) 1333 .DW LFDIV2 1334 PLUS: .DW JPLUS ; Сложение. 1335 JPLUS: RM3 MB 1 + MA M3 1336 KRMA KRMB + KMA ; Обёртка вокруг + 1337 KGOTO9
Реализации из SP-Forth 4.20:
CODE + ( n1|u1 n2|u2 -- n3|u3 ) \ 94 \ Сложить n1|u1 и n2|u2 и получить сумму n3|u3. ADD EAX, [EBP] LEA EBP, 4 [EBP] RET END-CODE
CODE F+ \ DE C1 FADDP ST(1), ST RET END-CODE
Советская реализация[править]
Слово + в ФОРТ-ЕС и FORTH ИТЭФ было примитивом и работало только с целыми числами. Вот его описание и определение в ФОРТ-ЕС:
+ W1,W2->W3 СУММА ЧИСЕЛ W1 И W2 17 Экран номер 17 ( 31.03.86 NEGATE ABS + - 1+ 1- 2+ 2- +! 1+! ) CODE + 14 LHRW12 BAL, RW1 RW2 AR, POPPUT1 В, END-CODE
Определение слова + в FORTH ИТЭФ:
HEAD 201Q,,253Q,PLUS ; + POP AX POP CX ADD AX, CX PUSH AX NEXT
Ссылки[править]
- Исходный текст слова + в Каллисто Классик 1.0
- См. слова −, 1+, 2+, +!, ×, ÷
- См. также символ +
- См. статьи «Сложение» и «Плюс» на Википедии
- См. слова + (plus) и F+ (f-plus) в стандарте ANS Forth (англ.)
- См. также слова + (plus) и F+ (f-plus) в черновике Forth 200x (англ.)
- См. слово + в главах «Основы Форта» и «Выполнение арифметических операций» книги Л.Броуди «Начальный курс программирования на языке Форт»
- См. также слово + в главах «Fundamental Forth» и «How to Get Results» книги Leo Brodie «Starting Forth» (англ.)