diff options
| author | Bob Eldering <eldering@jive.eu> | 2023-03-22 16:48:56 +0100 |
|---|---|---|
| committer | Bob Eldering <eldering@jive.eu> | 2023-03-27 15:18:37 +0200 |
| commit | 204927f66d2f71da3f4f676769da5684cf85f427 (patch) | |
| tree | 7345797a37cafb245a4196c7fba46563d854a6ae /numpy/f2py/tests/src | |
| parent | b35aac2c35ccfd5efadd7f72a090c9ad99308a60 (diff) | |
| download | numpy-204927f66d2f71da3f4f676769da5684cf85f427.tar.gz | |
BUG: Fix bug in parsing F77 style string arrays.
Example problematic variable: CHARACTER WORDARR(3)*8
This would be wrapped by an array with shape (3, 8) and dtype |S1,
instead of the desired shape (3,) and dtype |S8.
See #23356.
Diffstat (limited to 'numpy/f2py/tests/src')
| -rw-r--r-- | numpy/f2py/tests/src/string/scalar_string.f90 | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/numpy/f2py/tests/src/string/scalar_string.f90 b/numpy/f2py/tests/src/string/scalar_string.f90 index d847668bb..f8f076172 100644 --- a/numpy/f2py/tests/src/string/scalar_string.f90 +++ b/numpy/f2py/tests/src/string/scalar_string.f90 @@ -1,7 +1,9 @@ MODULE string_test character(len=8) :: string + character string77 * 8 character(len=12), dimension(5,7) :: strarr + character strarr77(5,7) * 12 END MODULE string_test |