]> git.saurik.com Git - bison.git/blobdiff - tests/bison.in
grammar: free the association tracking graph
[bison.git] / tests / bison.in
index 9e1709acfa9eabea3c94295eeb7977745e64cbb9..5c5881f773a00c15758d20cfb82f9c2529500f7f 100644 (file)
@@ -2,7 +2,7 @@
 # @configure_input@
 # Wrapper around a non installed bison to make it work as an installed one.
 
-# Copyright (C) 2001-2012 Free Software Foundation, Inc.
+# Copyright (C) 2001-2013 Free Software Foundation, Inc.
 #
 # This program is free software: you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
 
 abs_top_srcdir='@abs_top_srcdir@'
 abs_top_builddir='@abs_top_builddir@'
-
-: ${PERL=perl}
+: ${PERL='@PERL@'}
 
 # Use the shipped files, not those installed.
 BISON_PKGDATADIR=$abs_top_srcdir/data
 export BISON_PKGDATADIR
 
-trap 'rm -f /tmp/bison.$$.*; exit $status' 0 1 2 13 15
-$PREBISON "$abs_top_builddir/src/bison" ${1+"$@"} 2>/tmp/bison.$$.err
+$PREBISON "$abs_top_builddir/src/bison" ${1+"$@"}
 status=$?
-# Protect from gettextized quotes.  See quotearg.c's gettext_quote for
-# the UTF-8 sequences.  For context, see
-# http://lists.gnu.org/archive/html/bug-bison/2012-01/msg00120.html
-#
-# In UTF-8 the quoting quote are not ', so bison use them to quote the
-# ' character.  When using ASCII quotes, bison issues "'".
-$PERL -p                                                                \
-  -e "s{\\xe2\\x80\\x98|\\xe2\\x80\\x99|\\xa1\\ae|\\xa1\\xaf}{'}g;"     \
-  -e "s{'''}{\"'\"}g;"                                                  \
-  /tmp/bison.$$.err >&2
 
 # As a special dark magic, if we are actually using this wrapper to
 # compile Bison's src/parse-gram.y, post-process the synclines to
@@ -48,12 +36,13 @@ do
   case $i in
     */src/parse-gram.y)
     if $PERL --version >/dev/null; then
-      # We are called by ylwrap which still uses y.tab.*, and
-      # post-processes the synclines on y.tab.c itself.  Don't let it
-      # do it.  Besides, it leaves "parse-gram.y" as the source,
-      # dropping the src/ part.
-      $PERL -pi -e 's{"y\.tab\.}{"src/parse-gram.}g;'    \
-                -e 's{".*/(parse-gram\.y)"}{"src/$1"}g;' \
+      # We are called by ylwrap which (if it's an old version) still
+      # uses y.tab.*, and post-processes the synclines on y.tab.c
+      # itself.  Don't let it do it.  Besides, it leaves
+      # "parse-gram.y" as the source, dropping the src/ part.
+      $PERL -pi -e 's{"y\.tab\.}{"parse-gram.}g;'                       \
+                -e 's{"(?:.*/)?(parse-gram\.[chy])"}{"src/$1"}g;'       \
+                -e 's{GRAM_Y_TAB_H}{GRAM_SRC_PARSE_GRAM_H}g;'           \
            y.tab.[ch]
     fi
     ;;