module Hooks:sig..end
type message =
| |
Before_hygiene |
| |
After_hygiene |
| |
Before_options |
| |
After_options |
| |
Before_rules |
| |
After_rules |
val hooks : (message -> unit) Pervasives.refval setup_hooks : (message -> unit) -> unitval call_hook : message -> unit