| # Bison Parser Headers. -*- Autotest -*- |
| |
| # Copyright (C) 2001-2002, 2006-2007, 2009-2015, 2018-2019 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 |
| # the Free Software Foundation, either version 3 of the License, or |
| # (at your option) any later version. |
| # |
| # 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 GNU General Public License |
| # along with this program. If not, see <http://www.gnu.org/licenses/>. |
| |
| AT_BANNER([[Parser Headers.]]) |
| |
| |
| ## --------------------- ## |
| ## Invalid CPP headers. ## |
| ## --------------------- ## |
| |
| # AT_TEST_CPP_GUARD_H(BASE-NAME, [DIRECTIVES]) |
| # -------------------------------------------- |
| # FIXME: Much of this can be covered by calc.at. |
| m4_define([AT_TEST_CPP_GUARD_H], |
| [AT_SETUP([Invalid CPP guards: $2 --defines=$1.h]) |
| AT_BISON_OPTION_PUSHDEFS([$2]) |
| # Possibly create inner directories. |
| dirname=`AS_DIRNAME([$1])` |
| AS_MKDIR_P([$dirname]) |
| |
| AT_DATA_GRAMMAR([$1.y], |
| [$2 |
| %{ |
| #include <$1.h> |
| ]AT_YYERROR_DECLARE_EXTERN[ |
| ]AT_YYLEX_DECLARE_EXTERN[ |
| %} |
| %% |
| dummy: %empty; |
| %% |
| #include <$1.h> |
| ]) |
| |
| AT_BISON_CHECK([--defines=$1.h --output=$1.c $1.y]) |
| |
| AT_COMPILE([$1.o], [-I. -c $1.c]) |
| |
| AT_BISON_OPTION_POPDEFS |
| AT_CLEANUP |
| ]) |
| |
| AT_TEST_CPP_GUARD_H([input/input]) |
| AT_TEST_CPP_GUARD_H([9foo]) |
| AT_TEST_CPP_GUARD_H([input/input], [%glr-parser]) |
| AT_TEST_CPP_GUARD_H([9foo], [%glr-parser]) |
| |
| |
| |
| ## ---------------- ## |
| ## export YYLTYPE. ## |
| ## ---------------- ## |
| |
| AT_SETUP([export YYLTYPE]) |
| |
| AT_BISON_OPTION_PUSHDEFS([%name-prefix "my_"]) |
| AT_DATA_GRAMMAR([input.y], |
| [[%locations |
| |
| %name-prefix "my_" |
| %{ |
| #include <stdio.h> |
| #include <stdlib.h> |
| |
| ]AT_YYERROR_DEFINE[ |
| ]AT_YYLEX_DEFINE[ |
| %} |
| %% |
| exp: %empty; |
| ]]) |
| |
| AT_BISON_CHECK([--defines -o input.c input.y], [], [], |
| [[input.y:11.1-18: warning: deprecated directive: '%name-prefix "my_"', use '%define api.prefix {my_}' [-Wdeprecated] |
| input.y: warning: fix-its can be applied. Rerun with option '--update'. [-Wother] |
| ]]) |
| |
| # YYLTYPE should be defined, and MY_LLOC declared. |
| AT_DATA([caller.c], |
| [[#include "input.h" |
| YYLTYPE *my_llocp = &my_lloc; |
| |
| int my_parse (void); |
| |
| ]AT_MAIN_DEFINE[ |
| ]]) |
| |
| # Link and execute, just to make sure everything is fine (and in |
| # particular, that MY_LLOC is indeed defined somewhere). |
| AT_COMPILE([caller.o]) |
| AT_COMPILE([input.o]) |
| AT_COMPILE([caller], [caller.o input.o]) |
| AT_PARSER_CHECK([caller]) |
| AT_BISON_OPTION_POPDEFS |
| AT_CLEANUP |
| |
| |
| |
| ## -------------- ## |
| ## Sane headers. ## |
| ## -------------- ## |
| |
| # AT_TEST([DIRECTIVES], [COMPILER-FLAGS]) |
| # --------------------------------------- |
| # Check that headers are self-contained and protected againt multiple |
| # inclusions. |
| |
| m4_pushdef([AT_TEST], |
| [AT_SETUP([Sane headers: $1]) |
| |
| AT_BISON_OPTION_PUSHDEFS([$1]) |
| AT_DATA_GRAMMAR([input.y], |
| [[$1 |
| %define parse.error verbose |
| ]AT_VARIANT_IF([%token <int> 'x'], [%union {int integer;}])[ |
| %code { |
| #include <stdio.h> /* printf. */ |
| ]AT_PUSH_IF([[ |
| #if defined __GNUC__ && (7 == __GNUC__ || 9 == __GNUC__) |
| # pragma GCC diagnostic ignored "-Wmaybe-uninitialized" |
| #endif |
| ]])[ |
| ]AT_YYERROR_DECLARE[ |
| ]AT_YYLEX_DECLARE[ |
| } |
| %% |
| exp: |
| 'x' { printf ("x\n"); } |
| ; |
| |
| %% |
| ]AT_YYERROR_DEFINE[ |
| ]AT_YYLEX_DEFINE(["x"])[ |
| ]]) |
| |
| AT_BISON_CHECK([-d -o input.AT_LANG_EXT input.y]) |
| |
| AT_LANG_COMPILE([input.o]) |
| |
| AT_DATA([main.cc], |
| [AT_DATA_SOURCE_PROLOGUE |
| AT_MAIN_DEFINE |
| ]) |
| |
| # Check that the headers are self-contained, and protected against |
| # multiple inclusions. While at it, check they are sane for C++. |
| for h in *.AT_LANG_HDR |
| do |
| # No shell expansion with AT_DATA. |
| cat >$h.AT_LANG_EXT <<EOF |
| AT_DATA_SOURCE_PROLOGUE |
| #include "$h" |
| #include "$h" |
| EOF |
| AT_LANG_COMPILE([$h.o]) |
| done |
| |
| AT_BISON_OPTION_POPDEFS |
| |
| AT_CLEANUP |
| ])# AT_TEST |
| |
| AT_TEST([]) |
| AT_TEST([%locations %debug]) |
| |
| AT_TEST([%glr-parser]) |
| AT_TEST([%locations %debug %glr-parser]) |
| |
| AT_TEST([%define api.pure]) |
| AT_TEST([%define api.push-pull both]) |
| AT_TEST([%define api.pure %define api.push-pull both]) |
| |
| AT_TEST([%language "c++"]) |
| AT_TEST([%locations %debug %language "c++"]) |
| AT_TEST([%language "c++" %define api.value.type variant %define parse.assert]) |
| |
| AT_TEST([%locations %language "c++" %glr-parser]) |
| |
| |
| |
| ## ----------------- ## |
| ## Several parsers. ## |
| ## ----------------- ## |
| |
| AT_SETUP([Several parsers]) |
| |
| # AT_TEST([PREFIX], [DIRECTIVES]) |
| # ------------------------------- |
| # Generate and compile to *.o. Make sure there is no (allowed) YY* |
| # nor yy* identifiers in the header after applying api.prefix. Check |
| # that headers can be compiled by a C++ compiler. |
| m4_pushdef([AT_TEST], |
| [AT_BISON_OPTION_PUSHDEFS([%define api.prefix {$1_} $2]) |
| AT_DATA_GRAMMAR([$1.y], |
| [[%define api.prefix {$1_} |
| $2 |
| %define parse.error verbose |
| %union |
| { |
| int integer; |
| } |
| %{ |
| #include <stdio.h> /* printf. */ |
| ]AT_PUSH_IF([[ |
| #if defined __GNUC__ && (7 == __GNUC__ || 9 == __GNUC__) |
| # pragma GCC diagnostic ignored "-Wmaybe-uninitialized" |
| #endif |
| ]])[ |
| ]AT_YYERROR_DECLARE[ |
| ]AT_YYLEX_DECLARE[ |
| %} |
| %% |
| exp: |
| 'x' '1' { printf ("x1\n"); } |
| | 'x' '2' { printf ("x2\n"); } |
| | 'x' '3' { printf ("x3\n"); } |
| | 'x' '4' { printf ("x4\n"); } |
| | 'x' '5' { printf ("x5\n"); } |
| | 'x' '6' { printf ("x6\n"); } |
| | 'x' '7' { printf ("x7\n"); } |
| | 'x' '8' { printf ("x8\n"); } |
| | 'x' '9' { printf ("x9\n"); } |
| ; |
| |
| %% |
| ]AT_YYERROR_DEFINE[ |
| ]AT_YYLEX_DEFINE(["$1"])[ |
| ]]) |
| |
| AT_BISON_CHECK([-d -o $1.AT_LANG_EXT $1.y]) |
| |
| AT_LANG_COMPILE([$1.o]) |
| AT_CHECK([[echo "$1" >>expout]]) |
| |
| AT_BISON_OPTION_POPDEFS |
| ])# AT_TEST |
| |
| AT_DATA([main.cc], |
| [AT_DATA_SOURCE_PROLOGUE |
| [// If we are compiling with CC=$CXX, then do not load the C headers |
| // inside extern "C", since they were _not_ compiled this way. |
| #if ! CC_IS_CXX |
| extern "C" |
| { |
| #endif |
| #include "x1.h" |
| #include "x2.h" |
| #include "x3.h" |
| #include "x4.h" |
| #include "x6.h" |
| #include "x7.h" |
| #include "x8.h" |
| #if ! CC_IS_CXX |
| } |
| #endif |
| #include "x5.hh" |
| #include "x9.hh" |
| |
| #define RUN(S) \ |
| do { \ |
| int res = S; \ |
| if (res) \ |
| std::cerr << #S": " << res << '\n'; \ |
| } while (false) |
| |
| int |
| main (void) |
| { |
| RUN(x1_parse()); |
| RUN(x2_parse()); |
| RUN(x3_parse()); |
| RUN(x4_parse()); |
| x5_::parser p5; |
| RUN(p5.parse()); |
| RUN(x6_parse()); |
| RUN(x7_parse()); |
| RUN(x8_parse()); |
| x9_::parser p9; |
| RUN(p9.parse()); |
| return 0; |
| } |
| ]])# main.cc |
| |
| AT_TEST([x1], []) |
| AT_TEST([x2], [%locations %debug]) |
| AT_TEST([x3], [%glr-parser]) |
| AT_TEST([x4], [%locations %debug %glr-parser]) |
| AT_TEST([x5], [%locations %debug %language "c++"]) |
| AT_TEST([x6], [%define api.pure]) |
| AT_TEST([x7], [%define api.push-pull both]) |
| AT_TEST([x8], [%define api.pure %define api.push-pull both]) |
| AT_TEST([x9], [%locations %code requires {#include "location.hh"} %define api.location.type {x5_::location} %debug %language "c++"]) |
| #AT_TEST([x5], [%locations %language "c++" %glr-parser]) |
| |
| # Check that api.prefix works properly: |
| # |
| # - no 'yy' left. |
| # C++ output relies on namespaces and still uses yy a lot. |
| # |
| # - no 'YY' left. |
| # Ignore comments, YYChar (template parameter), YYPUSH_MORE(_DEFINED)? |
| # (constant definition), YY_\w+_INCLUDED (header guards). |
| # YYDEBUG (not renamed) can be read, but not changed. |
| AT_PERL_CHECK([[-n -0777 -e ' |
| s{/\*.*?\*/}{}gs; |
| s{//.*}{}g; |
| s{\b((defined|if)\ YYDEBUG |
| |YYChar |
| |YYPUSH_MORE(?:_DEFINED)? |
| |YYUSE |
| |YY_ATTRIBUTE(?:_PURE|_UNUSED) |
| |YY(?:_REINTERPRET)?_CAST |
| |YY_CONSTEXPR |
| |YY_COPY |
| |YY_CPLUSPLUS |
| |YY_IGNORE_(?:MAYBE_UNINITIALIZED|USELESS_CAST)_(?:BEGIN|END) |
| |YY_INITIAL_VALUE |
| |YY_MOVE |
| |YY_MOVE_OR_COPY |
| |YY_MOVE_REF |
| |YY_NOEXCEPT |
| |YY_NOTHROW |
| |YY_NULLPTR |
| |YY_RVREF |
| |YY_\w+_INCLUDED |
| )\b}{}gx; |
| while (/^(.*YY.*)$/gm) |
| { |
| print "$ARGV: invalid exported YY: $1\n"; |
| } |
| if ($ARGV =~ /\.h$/) |
| { |
| while (/^(.*yy.*)$/gm) |
| { |
| print "$ARGV: invalid exported yy: $1\n"; |
| } |
| } |
| ' -- *.hh *.h]]) |
| |
| # Do this late, so that other checks have been performed. |
| AT_SKIP_IF_CANNOT_LINK_C_AND_CXX |
| |
| AT_COMPILE_CXX([parser], [[x[1-9].o -DCC_IS_CXX=$CC_IS_CXX main.cc]]) |
| AT_PARSER_CHECK([parser], [0], [[expout]]) |
| |
| m4_popdef([AT_TEST]) |
| |
| AT_CLEANUP |