diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-03-25 12:33:17 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-25 14:37:03 +0000 |
| commit | 0ddaf51316ca1bab139289c51c648ec8213a8af3 (patch) | |
| tree | a9fd6998bb705e22db4900a95c81fa173591c4a2 /perly.fixer | |
| parent | 99ef548ba710eb2617804c989e4d5fdae1f04f37 (diff) | |
| download | perl-0ddaf51316ca1bab139289c51c648ec8213a8af3.tar.gz | |
Re: what is YYDEBUG and why does it reset errno?
Message-ID: <20020325113317.A1410@rafael>
Apparently VMS does not do YYDEBUG.
p4raw-id: //depot/perl@15486
Diffstat (limited to 'perly.fixer')
| -rwxr-xr-x | perly.fixer | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perly.fixer b/perly.fixer index 1c07724e63..31e0171e24 100755 --- a/perly.fixer +++ b/perly.fixer @@ -19,7 +19,7 @@ # gnupatch=patch -. config.sh +. ./config.sh input=$1 output=$2 @@ -52,6 +52,7 @@ if grep 'yaccpar 1.8 (Berkeley)' $input >/dev/null 2>&1; then -e 's/^yynewerror:$//' \ -e 's/^ goto yynewerror;//' \ -e 's|^static char yysccsid\(.*\)|/* static char yysccsid\1 */|' \ + -e 's|deprecate(|deprecate_old(|' \ < $output > $tmp && mv -f $tmp $output || exit 1 rm -rf $input echo "If you need to debug perly.c, you need to fix up the #line" @@ -72,6 +73,7 @@ elif grep 'yaccpar 1.9 (Berkeley)' $input >/dev/null 2>&1; then -e 's/^yynewerror:$//' \ -e 's/^ goto yynewerror;//' \ -e 's|^static char yysccsid\(.*\)|/* static char yysccsid\1 */|' \ + -e 's|deprecate(|deprecate_old(|' \ < $output > $tmp && mv -f $tmp $output || exit 1 rm -rf $input echo "If you need to debug perly.c, you need to fix up the #line" |