Skip to content

Commit 8a6398c

Browse files
Spencer Bryngelsonclaude
andcommitted
Fix ##-> #! Fypp comment in parallel_macros.fpp cray_noinline block
Same root cause as m_chemistry.fpp fix: ## is not a Fypp comment and passes through to the generated .f90 output. Inside #ifdef _CRAYFTN, gfortran never sees the ## lines (since _CRAYFTN is undefined there), but CCE does and errors with 'Unknown or unsupported compiler directive'. Change to #! which Fypp always strips. Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
1 parent 810056d commit 8a6398c

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/common/include/parallel_macros.fpp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -68,8 +68,8 @@
6868
#else
6969
$:cray_noinline_directive
7070
#endif
71-
## On non-Cray CPU builds (no _CRAYFTN, no MFC_OpenACC, no MFC_OpenMP), nothing is
72-
## emitted — intentional, since !DIR$ NOINLINE is a Cray-specific directive.
71+
#! On non-Cray CPU builds (no _CRAYFTN, no MFC_OpenACC, no MFC_OpenMP), nothing is
72+
#! emitted — intentional, since !DIR$ NOINLINE is a Cray-specific directive.
7373
#elif MFC_OpenACC
7474
$:acc_directive
7575
#elif MFC_OpenMP

0 commit comments

Comments
 (0)