summaryrefslogtreecommitdiff
path: root/ocaml-binary-annot/ocamlbuild/hooks.ml
diff options
context:
space:
mode:
Diffstat (limited to 'ocaml-binary-annot/ocamlbuild/hooks.ml')
-rw-r--r--ocaml-binary-annot/ocamlbuild/hooks.ml26
1 files changed, 26 insertions, 0 deletions
diff --git a/ocaml-binary-annot/ocamlbuild/hooks.ml b/ocaml-binary-annot/ocamlbuild/hooks.ml
new file mode 100644
index 0000000000..e7fd50d501
--- /dev/null
+++ b/ocaml-binary-annot/ocamlbuild/hooks.ml
@@ -0,0 +1,26 @@
+(***********************************************************************)
+(* ocamlbuild *)
+(* *)
+(* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *)
+(* *)
+(* Copyright 2007 Institut National de Recherche en Informatique et *)
+(* en Automatique. All rights reserved. This file is distributed *)
+(* under the terms of the Q Public License version 1.0. *)
+(* *)
+(***********************************************************************)
+
+
+(* Original author: Nicolas Pouillard *)
+type message =
+ | Before_hygiene
+ | After_hygiene
+ | Before_options
+ | After_options
+ | Before_rules
+ | After_rules
+
+let hooks = ref ignore
+
+let setup_hooks f = hooks := f
+
+let call_hook m = !hooks m