From 8f1ff41cf443a69bb3655f2ea1681b54fe0fd2fc Mon Sep 17 00:00:00 2001 From: matoro Date: Mon, 6 Nov 2023 10:21:32 -0500 Subject: [PATCH] BUG: alpha doesn't use REAL(10) Same as e.g. loongarch per gh-24904. At this point seems like it should be more of an exclude list than an include one... --- numpy/f2py/crackfortran.py | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/numpy/f2py/crackfortran.py b/numpy/f2py/crackfortran.py index f352bbaa2720..d17b052f9654 100755 --- a/numpy/f2py/crackfortran.py +++ b/numpy/f2py/crackfortran.py @@ -2452,7 +2452,7 @@ def _selected_real_kind_func(p, r=0, radix=0): if p < 16: return 8 machine = platform.machine().lower() - if machine.startswith(('aarch64', 'arm64', 'loongarch', 'power', 'ppc', 'riscv', 's390x', 'sparc')): + if machine.startswith(('aarch64', 'alpha', 'arm64', 'loongarch', 'power', 'ppc', 'riscv', 's390x', 'sparc')): if p <= 33: return 16 else: