summaryrefslogtreecommitdiff
path: root/src/pretty_print_ocaml.ml
diff options
context:
space:
mode:
authorThomas Bauereiss2017-08-01 18:41:34 +0100
committerThomas Bauereiss2017-08-01 18:42:53 +0100
commitb63df3a5806c33401f03a8e9eb33fc3291872105 (patch)
tree92bcd1435361296fb0e85b4be32f6278f959857f /src/pretty_print_ocaml.ml
parent2dfc638ac88f869a3bf318914cd2060ea363d89a (diff)
Add missing lexp case to Ocaml pretty-printer
Diffstat (limited to 'src/pretty_print_ocaml.ml')
-rw-r--r--src/pretty_print_ocaml.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/pretty_print_ocaml.ml b/src/pretty_print_ocaml.ml
index 4f2c3ab0..66252d94 100644
--- a/src/pretty_print_ocaml.ml
+++ b/src/pretty_print_ocaml.ml
@@ -237,7 +237,7 @@ let doc_exp_ocaml, doc_let_ocaml =
doc_op coloneq (doc_lexp_ocaml true le) (exp e)
| LEXP_vector _ ->
doc_op (string "<-") (doc_lexp_array_ocaml le) (exp e)
- | LEXP_vector_range _ ->
+ | LEXP_vector_range _ | LEXP_field _ ->
doc_lexp_rwrite le e)
else
(match le_act with