diff options
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/pprintast.ml | 2 | ||||
| -rw-r--r-- | parsing/pprintast.mli | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/parsing/pprintast.ml b/parsing/pprintast.ml index 98c73aad6..6ce6c31c9 100644 --- a/parsing/pprintast.ml +++ b/parsing/pprintast.ml @@ -2198,7 +2198,7 @@ let string_of_expression x = expression ppf x ; flush_str_formatter () ;; -let toplevel_phrase ppf x = +let top_phrase ppf x = pp_print_newline ppf () ; toplevel_phrase ppf x; fprintf ppf ";;" ; diff --git a/parsing/pprintast.mli b/parsing/pprintast.mli index ec89e3ad5..3a87faf4b 100644 --- a/parsing/pprintast.mli +++ b/parsing/pprintast.mli @@ -15,4 +15,4 @@ val signature: Format.formatter -> Parsetree.signature -> unit val expression: Format.formatter -> Parsetree.expression -> unit val pattern: Format.formatter -> Parsetree.pattern -> unit val core_type: Format.formatter -> Parsetree.core_type -> unit - +val top_phrase: Format.formatter -> Parsetree.toplevel_phrase -> unit |