core
/
eccodes
mirror of https://github.com/ecmwf/eccodes.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

ECC-320: bufr_dump -Dfortran. Increase max str size

This commit is contained in:
Shahram Najm 2016-09-13 18:34:30 +01:00
parent a35199de88
commit efe42cb58f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/grib_dumper_class_bufr_decode_fortran.c
View File

@ -615,7 +615,7 @@ static void header(grib_dumper* d, grib_handle* h)
fprintf(self->dumper.out,"program bufr_decode\n");
fprintf(self->dumper.out," use eccodes\n");
fprintf(self->dumper.out," implicit none\n");
fprintf(self->dumper.out," integer, parameter :: max_strsize = 100\n");
fprintf(self->dumper.out," integer, parameter :: max_strsize = 200\n");
fprintf(self->dumper.out," integer :: iret\n");
fprintf(self->dumper.out," integer :: ifile\n");
fprintf(self->dumper.out," integer :: ibufr\n");