Fix printing of variant arguments.

cristianoc · cristianoc · commit ace1c2bce75c · 2020-11-21T17:49:16.000+01:00
diff --git a/src/rescript-editor-support/PrintType.re b/src/rescript-editor-support/PrintType.re
@@ -199,7 +199,7 @@ let print_constructor = (loop, {Types.cd_id, cd_args, cd_res}) => {
     switch (cd_args) {
     | Cstr_tuple([]) => Pretty.empty
     | Cstr_record(_) => str("{...printing not supported...}")
-    | Cstr_tuple(args) => typeConstr(args, loop)
+    | Cstr_tuple(args) => tupleList(args, loop)
     }
   )
   @! (

Original file line number	Diff line number	Diff line change
`@@ -199,7 +199,7 @@ let print_constructor = (loop, {Types.cd_id, cd_args, cd_res}) => {`
`199`	`199`	`switch (cd_args) {`
`200`	`200`	`\| Cstr_tuple([]) => Pretty.empty`
`201`	`201`	`\| Cstr_record(_) => str("{...printing not supported...}")`
`202`		`- \| Cstr_tuple(args) => typeConstr(args, loop)`
	`202`	`+ \| Cstr_tuple(args) => tupleList(args, loop)`
`203`	`203`	`}`
`204`	`204`	`)`
`205`	`205`	`@! (`