forked from github/verilator
b5b1d94d4a
git-svn-id: file://localhost/svn/verilator/trunk/verilator@864 77ca24e4-aefa-0310-84f0-b9a241c72d87
33 lines
1.3 KiB
Perl
Executable File
33 lines
1.3 KiB
Perl
Executable File
#!/usr/bin/perl -w
|
|
#$Id$
|
|
######################################################################
|
|
#
|
|
# Copyright 2002-2007 by Wilson Snyder.
|
|
#
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of either the GNU General Public License or the
|
|
# Perl Artistic License.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the Perl Artistic License
|
|
# along with this module; see the file COPYING. If not, see
|
|
# www.cpan.org
|
|
#
|
|
######################################################################
|
|
|
|
# DESCRIPTION: Edits flex output to get around Redhat 8.0 broken flex.
|
|
|
|
foreach my $line (<STDIN>) {
|
|
# Fix flex 2.5.4 namespace omission
|
|
$line =~ s/^class istream;/\#include <iostream>\nusing namespace std;\n/;
|
|
# Fix flex 2.5.31 redefinition
|
|
$line =~ s!(\#define\s+yyFlexLexer\s+yyFlexLexer)!//flexfix: $1!g;
|
|
# Fix flex 2.5.1 yytext_ptr undef
|
|
$line =~ s!(\#undef\s+yytext_ptr)!//flexfix: $1!g;
|
|
print "$line";
|
|
}
|