numpy
diff --git a/‎doc/release/upcoming_changes/25186.improvement.rst
Lines changed: 1 addition & 0 deletions b/‎doc/release/upcoming_changes/25186.improvement.rst
Lines changed: 1 addition & 0 deletions
diff --git a/‎numpy/f2py/auxfuncs.py
Lines changed: 9 additions & 1 deletion b/‎numpy/f2py/auxfuncs.py
Lines changed: 9 additions & 1 deletion
@@ -0,0 +1 @@
+``f2py`` now handles ``common`` blocks which have ``kind`` specifications from modules. This further expands the usability of intrinsics like ``iso_fortran_env`` and ``iso_c_binding``.
@@ -50,7 +50,7 @@
     'isunsigned_long_longarray', 'isunsigned_short',
     'isunsigned_shortarray', 'l_and', 'l_not', 'l_or', 'outmess',
     'replace', 'show', 'stripcomma', 'throw_error', 'isattr_value',
-    'deep_merge'
+    'deep_merge', 'getuseblocks'
 ]
 
 
@@ -937,3 +937,11 @@ def get_f2py_modulename(source):
                 name = m.group('name')
                 break
     return name
+
+def getuseblocks(pymod):
+    all_uses = []
+    for inner in pymod['body']:
+        for modblock in inner['body']:
+            if modblock.get('use'):
+                all_uses.extend([x for x in modblock.get("use").keys() if "__" not in x])
+    return all_uses
Original file line number	Diff line number	Diff line change
`@@ -0,0 +1 @@`
	`1`	+``f2py`` now handles ``common`` blocks which have ``kind`` specifications from modules. This further expands the usability of intrinsics like ``iso_fortran_env`` and ``iso_c_binding``.