remove unnecessary [Ptyp_any]

Signed-off-by: David Vulakh <[email protected]>
janestreet · Aug 9, 2024 · 5742136 · 5742136
1 parent ec56a39
commit 5742136
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Ast.ml b/lib/Ast.ml
@@ -1946,7 +1946,7 @@ end = struct
     | { ast= {ptyp_desc= Ptyp_poly _; _}
       ; ctx= Typ {ptyp_desc= Ptyp_arrow _; _} } ->
         true
-    | { ast= {ptyp_desc= Ptyp_var (_, _) | Ptyp_any; _}
+    | { ast= {ptyp_desc= Ptyp_var (_, _); _}
       ; ctx= Typ {ptyp_desc= Ptyp_constr (_, args); _} }
       when List.length args > 1 ->
         (* Type variables and _ do not need parens when they appear as an