Skip to content
Browse files

remove -bin-annot

  • Loading branch information...
1 parent 7c562f3 commit b0ec378623c07da399503f0b1f92726348e985ed @osiire committed
Showing with 5 additions and 5 deletions.
  1. +1 −1 src/OMakefile
  2. +4 −4 src/events.ml
View
2 src/OMakefile
@@ -18,7 +18,7 @@ LIB = pec
PACKNAME = Pec
OCAMLPPFLAGS =
OCAMLFLAGS += -thread -w -13 -w -5 -for-pack $(capitalize $(LIB))
-OCAMLCFLAGS += -dtypes -bin-annot
+OCAMLCFLAGS += -dtypes
OCAMLDEPFLAGS += $(OCAMLPPFLAGS)
OCAML_LINK_FLAGS +=
OCAML_NATIVE_LINK_FLAGS +=
View
8 src/events.ml
@@ -340,10 +340,10 @@ let async_read f e =
let map f e =
let w = {
- get=(fun _ _ -> failwith "err");
- set_notify=(fun n -> set_notify n e);
- remove_notify=(fun id -> remove_notify id e);
- w_latest=None;
+ get = (fun _ _ -> failwith "err");
+ set_notify = (fun n -> set_notify n e);
+ remove_notify = (fun id -> remove_notify id e);
+ w_latest = None;
} in
w.get <- (fun id time ->
debug "map\n";

0 comments on commit b0ec378

Please sign in to comment.
Something went wrong with that request. Please try again.