Difference between revisions of "Or"

From Free Pascal wiki
Jump to navigationJump to search
(add footer AND CLEAN)
(24 intermediate revisions by 8 users not shown)
Line 1: Line 1:
= Boolean operation =
+
{{Or}}
  
'''Or''' produces a value of [[True|true]] if some value is true and [[False|false]] if both of its operands are false.
+
The [[Reserved word|reserved word]] <syntaxhighlight lang="pascal" enclose="none">or</syntaxhighlight> is a binary [[Operator|operator]].
 +
Originally it stood for the logical disjunction of two [[Boolean|boolean values]] only, but with the advent of [[Operator overloading|operator overloading]] [[FPC]] allows everything else, too.
 +
FPC also defines the <syntaxhighlight lang="pascal" enclose="none">or</syntaxhighlight> operator accepting two ordinal types while performing calculations on their internal binary representation.
  
== Truth table ==
+
== boolean operation ==
 +
The expression <syntaxhighlight lang="pascal" enclose="none">A or B</syntaxhighlight> represents the term <math>A \lor B</math> as it is familiar from classical logic.
 +
In electrical engineering writing <math>A + B</math> is common, too, but in programming the meaning of the plus sign differs.
 +
<syntaxhighlight lang="pascal" enclose="none">A</syntaxhighlight> and <syntaxhighlight lang="pascal" enclose="none">B</syntaxhighlight> are both boolean values.
 +
The expression evaluates to either [[false and true|<syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight> or <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>]].
 +
It is only <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight> if both operands are <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>:
  
{| border="1" style="border: 1px  solid; border-collapse: collapse;"
+
{| class="wikitable" style="text-align:center; margin:auto;"
 +
! <syntaxhighlight lang="pascal" enclose="none">A</syntaxhighlight>
 +
! <syntaxhighlight lang="pascal" enclose="none">B</syntaxhighlight>
 +
! <syntaxhighlight lang="pascal" enclose="none">A or B</syntaxhighlight>
 
|-
 
|-
!align=center| A !! align=center|B !! &nbsp; A or B &nbsp;
+
| <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>
 +
| <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>
 +
| style="background: #eeeeee" | <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>
 
|-
 
|-
| &nbsp; false &nbsp;|| &nbsp; false
+
| <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>
|style="background: #dddddd" | &nbsp; false
+
| <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
 +
| style="background: #eeeeee" | <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
 
|-
 
|-
| &nbsp; false || &nbsp; true
+
| <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
|style="background: #dddddd" | &nbsp; true
+
| <syntaxhighlight lang="pascal" enclose="none">false</syntaxhighlight>
 +
| style="background: #eeeeee" | <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
 
|-
 
|-
| &nbsp; true || &nbsp; false
+
| <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
|style="background: #dddddd" | &nbsp; true
+
| <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
|-
+
| style="background: #eeeeee" | <syntaxhighlight lang="pascal" enclose="none">true</syntaxhighlight>
| &nbsp; true || &nbsp; true  
+
|+ truth table for logical disjunction
|style="background: #dddddd" | &nbsp; true
 
 
|}
 
|}
  
 +
== bitwise operation ==
 +
Since virtually all instruction sets have an <syntaxhighlight lang="asm" enclose="none">or</syntaxhighlight> instruction, it is no surprise some high-level languages, especially those which aim to be suitable for hardware programming, provide some comparable functionality by itself.
 +
In FPC the <syntaxhighlight lang="pascal" enclose="none">or</syntaxhighlight> operator is defined appropriately.
 +
Such an expression, also known as bitwise or, requires two ordinal operands.
 +
The operation virtually performs a logical or taking each corresponding bit from both operands.
 +
    0101'1010
 +
or 0000'1011
 +
――――――――――――
 +
    0101'1011
 +
<!-- You're welcome to insert a different example where flags are or'ed together instead -->
 +
For a typical usage example of <syntaxhighlight lang="pascal" enclose="none">or</syntaxhighlight> confer [[&#octal base|<syntaxhighlight lang="pascal" enclose="none">program messageNo</syntaxhighlight>]]'s passing remark.
  
= Bitwise operation =
+
=== setting a bit ===
 
+
A common task is to set a specific bit.
Bitwise or sets the bit to 1 if one corresponding bits in its operands are 1, and to 0 if they all are 0.
+
To achieve this utilizing the <syntaxhighlight lang="pascal" enclose="none">or</syntaxhighlight> operator elicits a smart implementation:
 +
<syntaxhighlight lang="pascal">
 +
type
 +
integerBitIndex = 0..bitSizeOf(integer)-1;
  
== Set a bit ==
+
{$push}
<delphi>
+
{$rangeChecks on} // instead of raising an exception, generate an RTE
function SetBit(const AValue, ABitNumber:integer):integer;
+
function maskOn(const x: integer; const i: integerBitIndex): integer;
 
begin
 
begin
  result := AValue or (1 shl ABitNumber);
+
maskOn := x or (%1 shl i);
 
end;
 
end;
</delphi>
+
{$pop}
If you call SetBit(%1000,1) then get %1010 (%1000 = 8 and %1010 = 10). If you call SetBit(10,2) then get 14 (14 = %1110). If you call SetBit(10,1) then get 10.
+
</syntaxhighlight>
 +
For example calling <syntaxhighlight lang="delphi" enclose="none">maskOn(%1000, 1)</syntaxhighlight> will result in <syntaxhighlight lang="delphi" enclose="none">%1010</syntaxhighlight> (<syntaxhighlight lang="delphi" enclose="none">%1000</syntaxhighlight> equals decimal eight, and <syntaxhighlight lang="delphi" enclose="none">%1010</syntaxhighlight> is ten).
 +
 
 +
=== comparative remarks ===
 +
Note:
 +
The concept of [[Set|sets]] is an integral part of Pascal.
 +
Whilst in other programming languages considering operations on the bit level is not unusual, Pascal provides you with a powerful notion that relieves you from the burden of thinking about bits.
 +
Take it under advisement whether your programming task can be modeled with sets even better.
 +
 
 +
When using sets a [[Plus|plus sign {{HL|+}}]] virtually does the same as the bitwise {{HL|or}} does (depending on the compiler's implementation of the data type {{HL|set}}).
 +
This notation is, as already mentioned above, familiar from electrical engineering.
 +
However, when handling sets the bitwise {{HL|or}} is called a ''union'' (of sets).
  
=== Read more ===
+
{{Logical operators}}
* [[Shl]]
+
[[Category:Pascal]]
* [[Const]]
+
[[Category:Operators]]
* [[Function]]
 
* [[Integer]]
 

Revision as of 23:12, 16 October 2020

Deutsch (de) English (en) suomi (fi) français (fr) русский (ru)

The reserved word or is a binary operator. Originally it stood for the logical disjunction of two boolean values only, but with the advent of operator overloading FPC allows everything else, too. FPC also defines the or operator accepting two ordinal types while performing calculations on their internal binary representation.

boolean operation

The expression A or B represents the term [math]\displaystyle{ A \lor B }[/math] as it is familiar from classical logic. In electrical engineering writing [math]\displaystyle{ A + B }[/math] is common, too, but in programming the meaning of the plus sign differs. A and B are both boolean values. The expression evaluates to either true or false. It is only false if both operands are false:

A B A or B
false false false
false true true
true false true
true true true
truth table for logical disjunction

bitwise operation

Since virtually all instruction sets have an or instruction, it is no surprise some high-level languages, especially those which aim to be suitable for hardware programming, provide some comparable functionality by itself. In FPC the or operator is defined appropriately. Such an expression, also known as bitwise or, requires two ordinal operands. The operation virtually performs a logical or taking each corresponding bit from both operands.

   0101'1010
or 0000'1011
――――――――――――
   0101'1011

For a typical usage example of or confer program messageNo's passing remark.

setting a bit

A common task is to set a specific bit. To achieve this utilizing the or operator elicits a smart implementation:

type
	integerBitIndex = 0..bitSizeOf(integer)-1;

{$push}
{$rangeChecks on} // instead of raising an exception, generate an RTE
function maskOn(const x: integer; const i: integerBitIndex): integer;
begin
	maskOn := x or (%1 shl i);
end;
{$pop}

For example calling maskOn(%1000, 1) will result in %1010 (%1000 equals decimal eight, and %1010 is ten).

comparative remarks

Note: The concept of sets is an integral part of Pascal. Whilst in other programming languages considering operations on the bit level is not unusual, Pascal provides you with a powerful notion that relieves you from the burden of thinking about bits. Take it under advisement whether your programming task can be modeled with sets even better.

When using sets a plus sign + virtually does the same as the bitwise or does (depending on the compiler's implementation of the data type set). This notation is, as already mentioned above, familiar from electrical engineering. However, when handling sets the bitwise or is called a union (of sets).


navigation bar: Pascal logical operators
operators

and • or • not • xor
shl • shr
and_then (N/A)• or_else (N/A)

see also

{$boolEval} • Reference: § “boolean operators” • Reference: § “logical operators”