summaryrefslogtreecommitdiff
path: root/numpy/f2py/tests/src
diff options
context:
space:
mode:
authorRohit Goswami <rog32@hi.is>2023-04-16 18:18:02 +0000
committerRohit Goswami <rog32@hi.is>2023-04-16 18:18:02 +0000
commitf96b8daea959db191ff84b80dbc1ea948722fbaa (patch)
tree464a189319555138d79cd9a020a996eb46659af6 /numpy/f2py/tests/src
parentf5ff446c49e21411bac2320cd1d962debd9d1abf (diff)
downloadnumpy-f96b8daea959db191ff84b80dbc1ea948722fbaa.tar.gz
TST: Add a test for gh-23598
Diffstat (limited to 'numpy/f2py/tests/src')
-rw-r--r--numpy/f2py/tests/src/crackfortran/gh23598.f904
1 files changed, 4 insertions, 0 deletions
diff --git a/numpy/f2py/tests/src/crackfortran/gh23598.f90 b/numpy/f2py/tests/src/crackfortran/gh23598.f90
new file mode 100644
index 000000000..e0dffb5ef
--- /dev/null
+++ b/numpy/f2py/tests/src/crackfortran/gh23598.f90
@@ -0,0 +1,4 @@
+integer function intproduct(a, b) result(res)
+ integer, intent(in) :: a, b
+ res = a*b
+end function