sig
  type t = BNone | Blend | Add | Mod
  val to_string : SdlblendMode.t -> string
  val of_string : string -> SdlblendMode.t
end