MAINT: Reduce chatter to pass tests

HaoZeke · HaoZeke · commit 45137e0093b6 · 2023-11-22T21:13:24.000Z
diff --git a/numpy/f2py/_isocbind.py b/numpy/f2py/_isocbind.py
@@ -78,8 +78,8 @@
     'long double': 'g',  # long double
     'float _Complex': 'F',  # float  _Complex
     'double _Complex': 'D',  # double  _Complex
-    'long double _Complex': 'G',  # long double  _Complex
-    '_Bool': '?',  #  Bool
+    'long double _Complex': 'D',  # very approximate complex
+    '_Bool': 'i',  #  Bool but not really
     'char': 'c',   # char
 }
 
diff --git a/numpy/f2py/auxfuncs.py b/numpy/f2py/auxfuncs.py
@@ -918,7 +918,7 @@ def getuseblocks(pymod):
                 all_uses.extend([x for x in modblock.get("use").keys() if "__" not in x])
     return all_uses
 
-def process_f2cmap_dict(f2cmap_all, new_map, c2py_map):
+def process_f2cmap_dict(f2cmap_all, new_map, c2py_map, verbose = False):
     """
     Update the Fortran-to-C type mapping dictionary with new mappings and
     return a list of successfully mapped C types.
@@ -947,6 +947,9 @@ def process_f2cmap_dict(f2cmap_all, new_map, c2py_map):
         types to corresponding Python types and is used to ensure that the C
         types specified in `new_map` are valid.
 
+    verbose : boolean
+        A flag used to provide information about the types mapped
+
     Returns
     -------
     tuple of (dict, list)
@@ -972,12 +975,14 @@ def process_f2cmap_dict(f2cmap_all, new_map, c2py_map):
                         % (k, k1, f2cmap_all[k][k1], v1)
                     )
                 f2cmap_all[k][k1] = v1
-                outmess('\tMapping "%s(kind=%s)" to "%s"\n' % (k, k1, v1))
+                if verbose:
+                    outmess('\tMapping "%s(kind=%s)" to "%s"\n' % (k, k1, v1))
                 f2cmap_mapped.append(v1)
             else:
-                errmess(
-                    "\tIgnoring map {'%s':{'%s':'%s'}}: '%s' must be in %s\n"
-                    % (k, k1, v1, v1, list(c2py_map.keys()))
-                )
+                if verbose:
+                    errmess(
+                        "\tIgnoring map {'%s':{'%s':'%s'}}: '%s' must be in %s\n"
+                        % (k, k1, v1, v1, list(c2py_map.keys()))
+                    )
 
     return f2cmap_all, f2cmap_mapped
diff --git a/numpy/f2py/capi_maps.py b/numpy/f2py/capi_maps.py
@@ -155,7 +155,7 @@ def load_f2cmap_file(f2cmap_file):
         outmess('Reading f2cmap from {!r} ...\n'.format(f2cmap_file))
         with open(f2cmap_file) as f:
             d = eval(f.read().lower(), {}, {})
-        f2cmap_all, f2cmap_mapped = process_f2cmap_dict(f2cmap_all, d, c2py_map)
+        f2cmap_all, f2cmap_mapped = process_f2cmap_dict(f2cmap_all, d, c2py_map, True)
         outmess('Successfully applied user defined f2cmap changes\n')
     except Exception as msg:
         errmess('Failed to apply user defined f2cmap changes: %s. Skipping.\n' % (msg))
