# start code
%%
+use config qw(%config);
use Parse::Pidl::Util;
#####################################################################
undef $/;
my $cpp = $ENV{CPP};
if (! defined $cpp) {
- $cpp = "cpp"
+ $cpp = $config::config{'CPP'};
}
my $data = `$cpp -D__PIDL__ -xc $filename`;
$/ = $saved_delim;