Commit 091c52fe authored by Dan Fandrich's avatar Dan Fandrich
Browse files

Use the 3-argument open for compatibility with older perls

parent a83870ef

tests/symbol-scan.pl

+1 −1
Original line number Diff line number Diff line
@@ -35,7 +35,7 @@ my $verbose=0; 
my $summary=0;

my $misses=0;



open H_IN, "-|", "cpp", $h;

open H_IN, "-|", "cpp " . $h;

while ( <H_IN> ) {

    if ( /enum\s+(\S+\s+)?{/ .. /}/ ) {

        s/^\s+//;