Fix printing of type declarations in error message where they would be considered recursive by default

rescript-lang#5654

Author: cristianoc

CHANGELOG.md

@@ -12,6 +12,10 @@
 
 # 10.1.0-alpha.2
 
+#### :bug: Bug Fix
+
+- Fix printing of type declarations in error message where they would be considered recursive by default 
+
 # 10.1.0-alpha.1
 
 #### :boom: Breaking Change

jscomp/ml/printtyp.ml

@@ -936,7 +936,7 @@ let tree_of_type_declaration id decl rs =
   Osig_type (tree_of_type_decl id decl, tree_of_rec rs)
 
 let type_declaration id ppf decl =
-  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_first)
+  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_not)
 
 let constructor_arguments ppf a =
   let tys = tree_of_constructor_arguments a in

lib/4.06.1/unstable/js_compiler.ml

@@ -33417,7 +33417,7 @@ let tree_of_type_declaration id decl rs =
   Osig_type (tree_of_type_decl id decl, tree_of_rec rs)
 
 let type_declaration id ppf decl =
-  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_first)
+  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_not)
 
 let constructor_arguments ppf a =
   let tys = tree_of_constructor_arguments a in

lib/4.06.1/unstable/js_playground_compiler.ml

@@ -33417,7 +33417,7 @@ let tree_of_type_declaration id decl rs =
   Osig_type (tree_of_type_decl id decl, tree_of_rec rs)
 
 let type_declaration id ppf decl =
-  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_first)
+  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_not)
 
 let constructor_arguments ppf a =
   let tys = tree_of_constructor_arguments a in

lib/4.06.1/whole_compiler.ml

@@ -209804,7 +209804,7 @@ let tree_of_type_declaration id decl rs =
   Osig_type (tree_of_type_decl id decl, tree_of_rec rs)
 
 let type_declaration id ppf decl =
-  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_first)
+  !Oprint.out_sig_item ppf (tree_of_type_declaration id decl Trec_not)
 
 let constructor_arguments ppf a =
   let tys = tree_of_constructor_arguments a in