Module Binary.Int_op

type division_is_safe =
  1. | Safe
  2. | Unsafe
type t =
  1. | Add
  2. | Sub
  3. | Mul
  4. | Div of division_is_safe
  5. | Mod of division_is_safe
  6. | And
  7. | Or
  8. | Xor
val to_string : t -> string