diff options
Diffstat (limited to 'parsing/ast_helper.ml')
| -rw-r--r-- | parsing/ast_helper.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/parsing/ast_helper.ml b/parsing/ast_helper.ml index ed49f65a3..6657d5349 100644 --- a/parsing/ast_helper.ml +++ b/parsing/ast_helper.ml @@ -125,6 +125,7 @@ module Mty = struct let attr d a = {d with pmty_attributes = d.pmty_attributes @ [a]} let ident ?loc ?attrs a = mk ?loc ?attrs (Pmty_ident a) + let alias ?loc ?attrs a = mk ?loc ?attrs (Pmty_alias a) let signature ?loc ?attrs a = mk ?loc ?attrs (Pmty_signature a) let functor_ ?loc ?attrs a b c = mk ?loc ?attrs (Pmty_functor (a, b, c)) let with_ ?loc ?attrs a b = mk ?loc ?attrs (Pmty_with (a, b)) |