Change names to the standard library names for the functions in OCaml
This commit is contained in:
parent
ea661247b6
commit
cae0dfb1aa
@ -177,9 +177,9 @@ module Simplify = struct
|
||||
("Big_map.literal" , "BIG_MAP_LITERAL" ) ;
|
||||
("Big_map.empty" , "BIG_MAP_EMPTY" ) ;
|
||||
|
||||
("Bitwise.bor" , "OR") ;
|
||||
("Bitwise.band" , "AND") ;
|
||||
("Bitwise.xor" , "XOR") ;
|
||||
("Bitwise.lor" , "OR") ;
|
||||
("Bitwise.land" , "AND") ;
|
||||
("Bitwise.lxor" , "XOR") ;
|
||||
|
||||
("String.length", "SIZE") ;
|
||||
("String.size", "SIZE") ;
|
||||
|
@ -1,10 +1,10 @@
|
||||
(* Test CameLIGO bitwise operators *)
|
||||
|
||||
let or_op (n : nat) : nat =
|
||||
Bitwise.bor n 4p
|
||||
Bitwise.lor n 4p
|
||||
|
||||
let and_op (n : nat) : nat =
|
||||
Bitwise.band n 7p
|
||||
Bitwise.land n 7p
|
||||
|
||||
let xor_op (n : nat) : nat =
|
||||
Bitwise.xor n 7p
|
||||
Bitwise.lxor n 7p
|
||||
|
Loading…
Reference in New Issue
Block a user