diff options
author | Pearu Peterson <pearu.peterson@gmail.com> | 2009-07-27 19:27:35 +0000 |
---|---|---|
committer | Pearu Peterson <pearu.peterson@gmail.com> | 2009-07-27 19:27:35 +0000 |
commit | a0945f69ef64797a74e71e0314a6c0aa6cb2ecff (patch) | |
tree | 56b8fe060b06013b8f7f88fb8a1640c8a6f88b9c /numpy | |
parent | 0d3aeb0dde468a15ad15a44017842115bc3313e4 (diff) | |
download | numpy-a0945f69ef64797a74e71e0314a6c0aa6cb2ecff.tar.gz |
f2py: fix a bug evaluating parameters with kind function: kind(1.0), kind(1.0d) must be 4, 8, respectively.
Diffstat (limited to 'numpy')
-rwxr-xr-x | numpy/f2py/crackfortran.py | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/numpy/f2py/crackfortran.py b/numpy/f2py/crackfortran.py index 8f4b979c5..9901eb11d 100755 --- a/numpy/f2py/crackfortran.py +++ b/numpy/f2py/crackfortran.py @@ -1942,9 +1942,9 @@ def _kind_func(string): if string[0] in "'\"": string = string[1:-1] if real16pattern.match(string): - return 16 - elif real8pattern.match(string): return 8 + elif real8pattern.match(string): + return 4 return 'kind('+string+')' def _selected_int_kind_func(r): |