xsubppfix

来自「Verilog Parser in Perl」· 代码 · 共 13 行

#!/usr/bin/perl -w
#
# Copyright 2008-2009 by Wilson Snyder.  This program is free software;
# you can redistribute it and/or modify it under the terms of either the GNU
# Lesser General Public License or the Perl Artistic License.
#
######################################################################

# DESCRIPTION: Edits xsubpp output to get around various issues.

foreach my $line (<STDIN>) {
    # Fix xsubpp 1.9508 and GCC 4.2.1 warning
    # "warning: deprecated conversion from string constant to 鈥榗har*鈥