summaryrefslogtreecommitdiff
path: root/numpy
diff options
context:
space:
mode:
authorPearu Peterson <pearu.peterson@gmail.com>2009-07-27 19:27:35 +0000
committerPearu Peterson <pearu.peterson@gmail.com>2009-07-27 19:27:35 +0000
commita0945f69ef64797a74e71e0314a6c0aa6cb2ecff (patch)
tree56b8fe060b06013b8f7f88fb8a1640c8a6f88b9c /numpy
parent0d3aeb0dde468a15ad15a44017842115bc3313e4 (diff)
downloadnumpy-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-xnumpy/f2py/crackfortran.py4
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):