[bug] oprint does not work with arity 1 when it is also a tuple #1600
Description
a.ml
let f = fun [@bs] x -> let a,b = x in a + bbsc.exe -i a.ml val f : int -> int -> int [@bs] This should be
val f : int * int -> int [@bs] {{ message }}
a.ml
let f = fun [@bs] x -> let a,b = x in a + bbsc.exe -i a.ml val f : int -> int -> int [@bs] This should be
val f : int * int -> int [@bs]