diff options
| author | Jeremy Yallop <yallop@gmail.com> | 2016-09-03 14:18:34 +0100 |
|---|---|---|
| committer | Jeremy Yallop <yallop@gmail.com> | 2017-09-25 14:57:23 +0100 |
| commit | 67a51ed163d95b67c25823b7abee31ad6b576152 (patch) | |
| tree | 3b2d15e339f36da7a4fd64088bf8ef9f15ed6811 | |
| parent | 1a42f8144819d2e74012e636d4e6cdc5af9a14bc (diff) | |
| download | ocaml-67a51ed163d95b67c25823b7abee31ad6b576152.tar.gz | |
Fix printing of typed let-exception expressions.
| -rw-r--r-- | typing/printtyped.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/typing/printtyped.ml b/typing/printtyped.ml index 88961d04d1..f7598f83d7 100644 --- a/typing/printtyped.ml +++ b/typing/printtyped.ml @@ -379,7 +379,7 @@ and expression i ppf x = module_expr i ppf me; expression i ppf e; | Texp_letexception (cd, e) -> - line i ppf "Pexp_letexception\n"; + line i ppf "Texp_letexception\n"; extension_constructor i ppf cd; expression i ppf e; | Texp_assert (e) -> |