From e5c64e915b7e6ffe01467415d0c05bbd33ca0843 Mon Sep 17 00:00:00 2001 From: Hans Pabst Date: Fri, 6 Dec 2024 09:17:51 +0100 Subject: [PATCH] Provide statement for every case (#3796) - Fixes #3794 --- src/base/machine.F | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/base/machine.F b/src/base/machine.F index 65618ba50c..8f030da93a 100644 --- a/src/base/machine.F +++ b/src/base/machine.F @@ -292,14 +292,19 @@ CONTAINS SELECT CASE (isa) CASE (MACHINE_X86_SSE4) + m_cpuid_vlen = 16/nbytes CASE (MACHINE_ARM_ARCH64) ! NEON + m_cpuid_vlen = 16/nbytes CASE (MACHINE_ARM_SVE128) m_cpuid_vlen = 16/nbytes CASE (MACHINE_X86_AVX) + m_cpuid_vlen = 32/nbytes CASE (MACHINE_X86_AVX2) + m_cpuid_vlen = 32/nbytes CASE (MACHINE_ARM_SVE256) m_cpuid_vlen = 32/nbytes CASE (MACHINE_X86_AVX512) + m_cpuid_vlen = 64/nbytes CASE (MACHINE_ARM_SVE512) m_cpuid_vlen = 64/nbytes CASE DEFAULT ! unknown or generic