diff --git a/src/ev.ml b/src/ev.ml index d4f9aad..911e749 100644 --- a/src/ev.ml +++ b/src/ev.ml @@ -1,12 +1,12 @@ -type type' = Jv.t +type t = Jv.t module Event = struct (*type for simple Event *) - type t = type' + type nonrec t = t end module Mouse = struct - type t = type' + type nonrec t = t let latlng e = Latlng.of_jv_t @@ Jv.get e "latlng" end diff --git a/src/ev.mli b/src/ev.mli index 0a93bcf..fffa63d 100644 --- a/src/ev.mli +++ b/src/ev.mli @@ -1,4 +1,4 @@ -type type' +type t module Event : sig type t