[PING][PATCH] Fortran: Add debug functions for OpenMP data structures

[Paul-Antoine Arras]

I would like to ping this patch that is rather trivial.

Thanks,

On 06/05/2026 20:12, Paul-Antoine Arras wrote:

show_omp_namelist and show_omp_clauses cannot be called from GDB because
dumpfile is NULL at debug time. Add debug wrappers that temporarily set it to
stderr.

gcc/fortran/ChangeLog:

        * dump-parse-tree.cc (debug): Add debug functions for gfc_omp_namelist
        and gfc_omp_clauses.
---
  gcc/fortran/dump-parse-tree.cc | 22 ++++++++++++++++++++++
  1 file changed, 22 insertions(+)

diff --git a/gcc/fortran/dump-parse-tree.cc b/gcc/fortran/dump-parse-tree.cc
index 028c946d2d9..4613aae7e36 100644
--- a/gcc/fortran/dump-parse-tree.cc
+++ b/gcc/fortran/dump-parse-tree.cc
@@ -4714,3 +4714,25 @@ debug (gfc_array_ref *ar)
    fputc ('\n', dumpfile);
    dumpfile = tmp;
  }
+
+/* Dump OpenMP data structures.  */
+
+DEBUG_FUNCTION void
+debug (gfc_omp_namelist *n)
+{
+  FILE *tmp = dumpfile;
+  dumpfile = stderr;
+  show_omp_namelist (OMP_LIST_MAP, n);
+  fputc ('\n', dumpfile);
+  dumpfile = tmp;
+}
+
+DEBUG_FUNCTION void
+debug (gfc_omp_clauses *clauses)
+{
+  FILE *tmp = dumpfile;
+  dumpfile = stderr;
+  show_omp_clauses (clauses);
+  fputc ('\n', dumpfile);
+  dumpfile = tmp;
+}

--
PA