11 lines
286 B
Plaintext
11 lines
286 B
Plaintext
// Test PascaLIGO bitwise operators
|
|
|
|
function or_op (const n : nat) : nat is
|
|
begin skip end with bitwise_or(n , 4n)
|
|
|
|
function and_op (const n : nat) : nat is
|
|
begin skip end with bitwise_and(n , 7n)
|
|
|
|
function xor_op (const n : nat) : nat is
|
|
begin skip end with bitwise_xor(n , 7n)
|