Run make_class.pl

This commit is contained in:
Shahram Najm 2018-05-17 16:29:02 +01:00
parent 3f5177f1c7
commit 0c1b1df8d9
7 changed files with 89 additions and 88 deletions

View File

@ -57,6 +57,7 @@ typedef struct grib_iterator_gaussian{
double angleOfRotation;
double southPoleLat;
double southPoleLon;
long jPointsAreConsecutive;
/* Members defined in gaussian */
} grib_iterator_gaussian;

View File

@ -38,10 +38,10 @@ or edit "iterator.class" and rerun ./make_class.pl
static void init_class (grib_iterator_class*);
static int init (grib_iterator* iter,grib_handle*,grib_arguments*);
static int init (grib_iterator* i,grib_handle*,grib_arguments*);
static int destroy (grib_iterator* i);
static int reset (grib_iterator* iter);
static long has_next (grib_iterator* iter);
static int reset (grib_iterator* i);
static long has_next (grib_iterator* i);
typedef struct grib_iterator_gen{

View File

@ -34,8 +34,8 @@ or edit "iterator.class" and rerun ./make_class.pl
static void init_class (grib_iterator_class*);
static int init (grib_iterator* iter,grib_handle*,grib_arguments*);
static int next (grib_iterator* iter, double *lat, double *lon, double *val);
static int init (grib_iterator* i,grib_handle*,grib_arguments*);
static int next (grib_iterator* i, double *lat, double *lon, double *val);
typedef struct grib_iterator_latlon{

View File

@ -1,8 +1,8 @@
/* This file is automatically generated by ./make_class.pl, do not edit */
extern grib_nearest_class* grib_nearest_class_gen;
extern grib_nearest_class* grib_nearest_class_lambert_conformal;
extern grib_nearest_class* grib_nearest_class_polar_stereographic;
extern grib_nearest_class* grib_nearest_class_latlon_reduced;
extern grib_nearest_class* grib_nearest_class_polar_stereographic;
extern grib_nearest_class* grib_nearest_class_reduced;
extern grib_nearest_class* grib_nearest_class_regular;
extern grib_nearest_class* grib_nearest_class_sh;

View File

@ -2,13 +2,13 @@
use strict;
use Data::Dumper;
my $name;
my $verbose = 0;
foreach $name ( @ARGV )
{
next unless($name =~ /\.c$/);
print "$name\n";
print "$name\n" if ($verbose);
open(IN,"<$name") or die "$name: $!";
open(OUT,">$name.tmp") or die "$name.tmp: $!";
@ -78,7 +78,7 @@ foreach $name ( @ARGV )
}
else
{
print "IGNORING file $name\n";
print "IGNORING file $name\n" if ($verbose);
}
unlink("$name.tmp");