[netcdfgroup] spurious print in nf90_put_var_2D_FourByteInt()

Hi all,

It seems that in version 4.1.3 of NetCDF a spurious print statement was 
inserted in the nf90_put_var_2D_FourByteInt() function in 
f90/netcdf_expanded.f90.

This causes our code to segfault as it is writing a 2D integer array with less 
than 4 columns.

I've included a patch below that removes the problem line. This extra print 
statement is still in netcdf-fortran-4.2-beta2.

Best regards,
Matt.



--- f90/netcdf_expanded.f90.old 2011-08-20 19:19:19.000000000 -0500
+++ f90/netcdf_expanded.f90     2011-08-20 19:20:05.000000000 -0500
@@ -731,7 +731,6 @@
         nf90_put_var_2D_FourByteInt = &
              nf_put_vars_int(ncid, varid, localStart, localCount, localStride, 
int(values))
      else
-        print *, values(1, 1), values(1, 2), values(1, 3), values(1, 4)
         nf90_put_var_2D_FourByteInt = &
              nf_put_vara_int(ncid, varid, localStart, localCount, values)
      end if



  • 2011 messages navigation, sorted by:
    1. Thread
    2. Subject
    3. Author
    4. Date
    5. ↑ Table Of Contents
  • Search the netcdfgroup archives: