--- gcc-13.2.0/libgomp/env.c~	2023-07-27 10:13:08.000000000 +0200
+++ gcc-13.2.0/libgomp/env.c	2024-01-03 15:32:23.542720713 +0100
@@ -2059,6 +2059,7 @@
   none = gomp_get_initial_icv_item (GOMP_DEVICE_NUM_FOR_NO_SUFFIX);
   initialize_icvs (&none->icvs);
 
+  if ( environ )
   for (env = environ; *env != 0; env++)
     {
       if (!startswith (*env, "OMP_"))