mirror of https://github.com/ecmwf/eccodes.git
Add more debugging output on Fortran call of grib_dump()
This commit is contained in:
parent
1dd764113e
commit
b4a3347cd8
|
@ -1914,6 +1914,11 @@ int grib_f_release(int* hid){
|
||||||
/*****************************************************************************/
|
/*****************************************************************************/
|
||||||
static void do_the_dump(grib_handle* h)
|
static void do_the_dump(grib_handle* h)
|
||||||
{
|
{
|
||||||
|
/* Add some debugging info too */
|
||||||
|
printf("ecCodes version: "); grib_print_api_version(stdout); printf("\n");
|
||||||
|
printf("Definitions path: %s\n", grib_definition_path(NULL));
|
||||||
|
printf("Samples path: %s\n", grib_samples_path(NULL));
|
||||||
|
|
||||||
if (h->product_kind == PRODUCT_GRIB)
|
if (h->product_kind == PRODUCT_GRIB)
|
||||||
{
|
{
|
||||||
const int dump_flags = GRIB_DUMP_FLAG_VALUES
|
const int dump_flags = GRIB_DUMP_FLAG_VALUES
|
||||||
|
|
Loading…
Reference in New Issue