Source file `Infix.ml`

1
2
3
4
5
6
7
8
9
10
11
12
module Int64 = struct
  open Int64
  let (land) = logand
  let (lsl) = shift_left
  let (lsr) = shift_right_logical
  let (lor) = logor
  let (lxor) = logxor
  let (+) = add
  let (/) = div
  let ( * ) = mul
  let (-) = sub
end