module Trans: sig .. end
sig
end
exception Trans_error of Ast.l * string
Ast.l * string
type 'a macro = Macro_expander.macro_context -> 'a -> 'a option
'a
Macro_expander.macro_context -> 'a -> 'a option
type pat_macro = Macro_expander.pat_position -> Typed_ast.pat macro
Macro_expander.pat_position -> Typed_ast.pat macro
module Macros: functor (E : sigval env : Typed_ast.envend) -> sig .. end
functor (
E
:
val env : Typed_ast.env
Typed_ast.env
) ->