XOR: различия между версиями
AtH (обсуждение | вклад) |
AtH (обсуждение | вклад) (→Ссылки) |
||
Строка 69: | Строка 69: | ||
== Ссылки == | == Ссылки == | ||
* {{Исходник|XOR|XOR}} | * {{Исходник|XOR|XOR}} | ||
* См. слова [[ | * См. слова [[AND]], [[OR]] и [[NOT]] | ||
* [http://ru.wikipedia.org/wiki/%D0%A1%D0%BB%D0%BE%D0%B6%D0%B5%D0%BD%D0%B8%D0%B5_%D0%BF%D0%BE_%D0%BC%D0%BE%D0%B4%D1%83%D0%BB%D1%8E_2 Сложение по модулю 2], [https://ru.wikipedia.org/wiki/%D0%9B%D0%BE%D0%B3%D0%B8%D0%BA%D0%B0_%D0%B2%D1%8B%D1%81%D0%BA%D0%B0%D0%B7%D1%8B%D0%B2%D0%B0%D0%BD%D0%B8%D0%B9 Логика высказываний] и [https://ru.wikipedia.org/wiki/%D0%91%D0%B8%D1%82%D0%BE%D0%B2%D1%8B%D0%B5_%D0%BE%D0%BF%D0%B5%D1%80%D0%B0%D1%86%D0%B8%D0%B8 Битовые операции] в Википедии | * [http://ru.wikipedia.org/wiki/%D0%A1%D0%BB%D0%BE%D0%B6%D0%B5%D0%BD%D0%B8%D0%B5_%D0%BF%D0%BE_%D0%BC%D0%BE%D0%B4%D1%83%D0%BB%D1%8E_2 Сложение по модулю 2], [https://ru.wikipedia.org/wiki/%D0%9B%D0%BE%D0%B3%D0%B8%D0%BA%D0%B0_%D0%B2%D1%8B%D1%81%D0%BA%D0%B0%D0%B7%D1%8B%D0%B2%D0%B0%D0%BD%D0%B8%D0%B9 Логика высказываний] и [https://ru.wikipedia.org/wiki/%D0%91%D0%B8%D1%82%D0%BE%D0%B2%D1%8B%D0%B5_%D0%BE%D0%BF%D0%B5%D1%80%D0%B0%D1%86%D0%B8%D0%B8 Битовые операции] в Википедии | ||
* [http://www.catb.org/~esr/jargon/html/X/xor.html XOR на The Jargon File] ''(англ.)'' | * [http://www.catb.org/~esr/jargon/html/X/xor.html XOR на The Jargon File] ''(англ.)'' |
Версия от 21:42, 3 июля 2016
XOR (исключающее или, читается «ксор») — стандартное слово Каллисто. 32-битное поразрядное сложение по модулю два.
XOR ( n1 n2 −− i ) 32−битное сложение по модулю два (исключающее или). i := n1 ⊕ n2
Выполняет 32-битное логическое исключающее «или» для целых чисел n1 и n2, результат в дополнительном коде i заносится в стек.
Другими словами, каждый из 32 битов числа n1 сравнивается с соответствующим битом числа n2 и, если один из них (но не оба) равен единице, в соответствующий бит числа i заносится единица. В противном случае, когда оба рассматриваемых бита совпадают, соответствующий бит результата i будет равен нулю.
Ввод слова XOR
В режиме ЛАТ последовательно нажмите три белые клавиши 0 5 ×
Детали реализации
В Каллисто для записи 32-битных целых чисел в десятичном стеке используется дополнительный код (англ. two's complement). На входе слово XOR принимает как 32-битные целые в дополнительном коде, так и беззнаковые целые. Результат i всегда представлен в дополнительном коде и отрицателен, если старший бит в нём установлен.
XOR даёт правильный результат побитового исключающего «или» над числами любой разрядности, меньшей 32, включая 24-, 16- и 8-битные числа. Если оба аргумента разрядности меньше, чем 32, представлены в дополнительном коде, результат i также выдаётся в дополнительном коде. Если оба аргумента представлены в беззнаковом виде, результат также будет в беззнаковом виде — положительным числом или нулём.
Последовательности слов 65535, XOR и 255 XOR позволяют сделать поразрядное логическое отрицание (NOT) 16-битного и 8-битного числа, находящегося на вершине стека.
Также слово XOR можно использовать для логической операции исключающего "или" над флагами, если значение «истина» представляется числом -1. Все стандартные слова Каллисто, возвращающие логическое значение (например, команды сравнения), используют это значение для возвращаемого флага «истина».
Слово XOR реализовано с использованием команды ЭКВМ K XOR.
XOR в стандарте ANS Forth
6.1.2490 XOR "x-or" CORE ( x1 x2 -- x3 ) x3 поразрядное исключающее-или x1 и x2.
История
XOR в предыдущем стандарте Forth-83 (англ.)
XOR 16b1 16b2 -- 16b3 79 "x-or" 16b3 is the bit-by-bit exclusive-or of 16b1 with 16b2.
XOR в стандарте Forth-79 (англ.)
XOR n1 n2 -- n3 174 "x-or" Leave the bitwise exclusive-or of two numbers.
XOR в fig-FORTH Release 1 glossary, май 1979 (англ.)
XOR nl n2 --- xor L1 Leave the bitwise logical exclusive or of two values.
Реализация
Слово XOR в ФОРТ-ЕС было примитивом. Вот его определение:
XOR W1,W2->W3 ПОРАЗРЯДНОЕ "ИСКЛЮЧАЮЩЕЕ ИЛИ" 13 Экран номер 13 ( 31.03.86 AND OR XOR NOT 0= 0< ) CODE XOR ( W1,M2->W3) 14 LHRW12 BAL, RW1 RW2 XR, POPPUT1 B, END-CODE
В FORTH ИТЭФ слово XOR также было примитивом, вот его определение:
HEAD 203Q,'AN',304Q,$AND ; AND POP AX POP CX AND AX, CX ENDA: PUSH AX NEXT ... HEAD 203Q,'XO',322Q,$XOR ; XOR POP AX POP CX XOR AX, CX JMP ENDA
Ссылки
- Исходный текст слова XOR в Каллисто Классик 1.0
- См. слова AND, OR и NOT
- Сложение по модулю 2, Логика высказываний и Битовые операции в Википедии
- XOR на The Jargon File (англ.)
- Слово XOR (x-or) в стандарте ANS Forth (англ.)
- Слово XOR (x-or) в черновике Forth 200x (англ.)
- КОМПЬЮТЕР "ПРИНИМАЕТ РЕШЕНИЯ" в книге Л.Броуди «Начальный курс программирования на языке Форт»
- ЧИСЛО ТИПОВ ЧИСЕЛ в книге Л.Броуди «Начальный курс программирования на языке Форт»
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |