X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/fa98bb3233f7f291d8efa2565288bc0597f92063..ee616bdc62db15f2f9bdad42bdf8699d9c374c8c:/tests/skeletons.at?ds=sidebyside diff --git a/tests/skeletons.at b/tests/skeletons.at index ce079d62..68a004ec 100644 --- a/tests/skeletons.at +++ b/tests/skeletons.at @@ -1,6 +1,6 @@ # Checking skeleton support. -*- Autotest -*- -# Copyright (C) 2007, 2009-2012 Free Software Foundation, Inc. +# Copyright (C) 2007, 2009-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 @@ -106,18 +106,13 @@ yylex (void) { return 'a'; } - -int -main (void) -{ - return yyparse (); -} +]AT_MAIN_DEFINE[ ]]) -AT_DATA([[input-cmd-line.y]], +AT_DATA_GRAMMAR([[input-cmd-line.y]], [AT_GRAM]) -AT_DATA([[input-gram.y]], +AT_DATA_GRAMMAR([[input-gram.y]], [[%skeleton "yacc.c"] AT_GRAM]) @@ -315,7 +310,7 @@ print '@output(@,@)', "\n"; (print "garbage"x10, "\n") for (1..1000); print "${M4}_divert_pop(0)\n"; ]]) -AT_CHECK([[perl gen-skel.pl > skel.c || exit 77]]) +AT_CHECK([[$PERL gen-skel.pl > skel.c || exit 77]]) AT_DATA([[input.y]], [[%skeleton "./skel.c"