diff --git a/src/boot/me/type.ml b/src/boot/me/type.ml index 97dc2c15ac4..2a208db7043 100644 --- a/src/boot/me/type.ml +++ b/src/boot/me/type.ml @@ -125,7 +125,7 @@ let rec tyspec_to_str (ts:tyspec) : string = fmt_cbb ff; | TYSPEC_tuple tvs -> - fmt ff "("; + fmt ff "tuple ("; fmt_tvs ff tvs; fmt ff ")";