diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-03-17 11:01:32 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2016-03-17 11:34:51 +0100 |
| commit | 29f26d380177495a224c3b94d3309a3d23693d8f (patch) | |
| tree | 9cb911aae601214c0198b9becdce28b53315435c /grammar/q_util.mli | |
| parent | 6caf8b877e44862b21104236423c23972166cdd7 (diff) | |
Reducing the number of modules linked in grammar.cma.
Diffstat (limited to 'grammar/q_util.mli')
| -rw-r--r-- | grammar/q_util.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/grammar/q_util.mli b/grammar/q_util.mli index d0e0dab22..90fe1645f 100644 --- a/grammar/q_util.mli +++ b/grammar/q_util.mli @@ -10,7 +10,7 @@ open Compat (* necessary for camlp4 *) type extend_token = | ExtTerminal of string -| ExtNonTerminal of Genarg.argument_type * Extend.user_symbol * Names.Id.t +| ExtNonTerminal of Genarg.argument_type * Extend.user_symbol * string val mlexpr_of_list : ('a -> MLast.expr) -> 'a list -> MLast.expr @@ -34,7 +34,7 @@ val mlexpr_of_string : string -> MLast.expr val mlexpr_of_option : ('a -> MLast.expr) -> 'a option -> MLast.expr -val mlexpr_of_ident : Names.Id.t -> MLast.expr +val mlexpr_of_ident : string -> MLast.expr val mlexpr_of_prod_entry_key : Extend.user_symbol -> MLast.expr |