--- gcc-13.1.1/libgomp/env.c.orig	2023-06-20 10:11:45.125868665 +0200
+++ gcc-13.1.1/libgomp/env.c	2023-06-20 10:04:18.089095860 +0200
@@ -2059,6 +2059,9 @@
   none = gomp_get_initial_icv_item (GOMP_DEVICE_NUM_FOR_NO_SUFFIX);
   initialize_icvs (&none->icvs);
 
+  if (environ == 0) fprintf(stderr, "FIXME: initialize_env: environ is not initialized\n");
+
+  if (environ != 0)
   for (env = environ; *env != 0; env++)
     {
       if (!startswith (*env, "OMP_"))