https://gcc.gnu.org/bugzilla/show_bug.cgi?id=90539

--- Comment #18 from Martin Liška <marxin at gcc dot gnu.org> ---
$ cat -n netcdf/netcdf_expanded.f90:
...
  1470  print *,shape(values)
  1471  print *,size(values)
  1472  print *,is_contiguous(values)
  1473  
  1474         nf90_put_var_1D_EightByteReal = &
  1475            nf_put_vara_double(ncid, varid, localStart, localCount,
values)
  1476       end if
  1477     end function nf90_put_var_1D_EightByteReal
...

gets me:

           1
           1
 T

Program received signal SIGSEGV: Segmentation fault - invalid memory reference.

Backtrace for this error:
#0  0x7f955f316b40 in ???
#1  0x7f955f315d75 in ???
#2  0x7f955efc3e0f in ???
        at
/usr/src/debug/glibc-2.29-5.1.x86_64/signal/../sysdeps/unix/sysv/linux/x86_64/sigaction.c:0
#3  0x8e905c in __netcdf_MOD_nf90_put_var_1d_eightbytereal
        at
/home/marxin/Programming/cpu2017/benchspec/CPU/527.cam4_r/build/build_peak_gcc7-m64.0000/netcdf_expanded.f90:1475

So print result is: 1, 1, T.

Reply via email to