Testing: gts_header accessor

src/grib_accessor_class_gts_header.cc

@@ -118,7 +118,6 @@ static int pack_string(grib_accessor* a, const char* val, size_t* len)
     return GRIB_NOT_IMPLEMENTED;
 }
 
-
 static int unpack_string(grib_accessor* a, char* val, size_t* len)
 {
     grib_accessor_gts_header* self = (grib_accessor_gts_header*)a;

tests/gts_get.sh

@@ -29,4 +29,11 @@ fTmp=${label}".tmp.txt"
 gts_file=EGRR20150317121020_00493212.DAT
 ${tools_dir}/gts_get -p TT,AA,II,CCCC,YY,GG,gg,BBB $gts_file >/dev/null
 
+gts_file=${data_dir}/gts.grib
+result=$( ${tools_dir}/grib_get -wcount=1 -p gts_CCCC -g $gts_file )
+[ "$result" = "ECMG" ]
+
+${tools_dir}/grib_get -wcount=1 -p gts_header -g $gts_file
+
+
 rm -f $fLog

tests/gts_ls.sh

@@ -52,5 +52,10 @@ echo 'print "[theMessage]";' | ${tools_dir}/gts_filter - $gts_file
 
 ${tools_dir}/gts_ls -wcount=1 -p theMessage $f
 
+
+gts_file=${data_dir}/gts.grib
+result=$( ${tools_dir}/grib_ls -wcount=1 -p gts_CCCC -g $gts_file )
+
+
 # Clean up
 rm -f $fLog $res_ls