X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/c85541913b99f841de090aacf626bb8f52f7f727..5202b6ac1d3662fe283240aab1b29f35607995cd:/tests/synclines.at diff --git a/tests/synclines.at b/tests/synclines.at index e2b7005d..99f9df90 100644 --- a/tests/synclines.at +++ b/tests/synclines.at @@ -1,6 +1,6 @@ # Executing Actions. -*- Autotest -*- -# Copyright (C) 2002, 2004-2005, 2007, 2009-2012 Free Software +# Copyright (C) 2002, 2004-2005, 2007, 2009-2013 Free Software # Foundation, Inc. # This program is free software: you can redistribute it and/or modify @@ -23,7 +23,7 @@ AT_BANNER([[User Actions.]]) # -------------------------- # Compile FILE expecting an error, and save in the file stdout the # normalized output. Ignore the exit status, since some compilers -# (e.g. c89 on IRIX 6.5) trigger warnings on `#error', instead of +# (e.g. c89 on IRIX 6.5) trigger warnings on '#error', instead of # errors. m4_define([AT_SYNCLINES_COMPILE], [AT_CHECK([$CC $CFLAGS $CPPFLAGS -c $1], [ignore], [], [stderr]) @@ -47,13 +47,14 @@ m4_define([AT_SYNCLINES_COMPILE], # => # input.y:4: #error "8" # -# The message may include a caret-error: +# The message may include a caret-error (indented by GCC 4.8, +# not by clang 3.2): # # input.y:1:2: error: #error "1" # #error "1" # ^ # -# And possibly distcc adds its bits. +# Possibly distcc adds its bits. # # distcc[33187] ERROR: compile (null) on localhost failed # syncline.c:1:2: error: #error "1" @@ -63,13 +64,38 @@ m4_define([AT_SYNCLINES_COMPILE], # # distcc[35882] (dcc_connect_by_name) ERROR: failed to look up host "chrisimac": Unknown host # distcc[35882] Warning: failed to distribute input.c to chrisimac/4, running locally instead +# +# The compiler might end by the number of messages issued (Clang 3.2): +# +# syncline.c:1:2: error: "1" +# #error "1" +# ^ +# 1 error generated. +# +# When c++ is used to compiler C, we might have more messages (Clang 3.2): +# +# clang: warning: treating 'c' input as 'c++' when in C++ mode, this behavior is deprecated -AT_CHECK([[perl -p -0777 - stderr <<\EOF +AT_CHECK([[$PERL -p -0777 - stderr <<\EOF + # 1. Remove useless lines. + + # distcc clutter. s/^distcc\[\d+\] .*\n//gm; - s/^([^:]+:\d+)[.:][^:]+:(.+)$/$][1:$][2/gm; - s/^([^:]+:\d+):[^#]*( #error)/$][1:$][2/gm; + # c vs. c++. + s/^clang: warning: treating 'c' input as 'c\+\+'.*\n//gm; + # Function context. s/^[^:]*: In function '[^']+':\n//gm; - s/^\ +#error.*\n\ *\^\n//gm; + # Caret error. + s/^ *#error.*\n *\^\n//gm; + # Number of errors. + s/^1 error generated\.\n//gm; + + # 2. Normalize the lines we kept. + + # Remove column. + s/^([^:]+:\d+)[.:][^:]+:(.+)$/$][1:$][2/gm; + # Map all combinations of "error: " and "#error: " to "#error ". + s/^([^:]+:\d+):( |#error|error|:)+/$][1: #error /gm; EOF ]], 0, [stdout]) @@ -101,7 +127,7 @@ AT_BISON_OPTION_PUSHDEFS AT_DATA([syncline.c], [[#error "1" -int i; // avoids -pedantic warning about an empty translation unit +int i; /* avoids -pedantic warning about an empty translation unit. */ ]]) AT_SYNCLINES_COMPILE([syncline.c]) @@ -216,4 +242,54 @@ exp: '0'; [input.y:8: #error "8" ]) +## -------------------- ## +## %code top syncline. ## +## -------------------- ## + +AT_TEST([%code top syncline], +[[%code top { +#error "2" +} +%{ +]AT_YYERROR_DECLARE_EXTERN[ +]AT_YYLEX_DECLARE_EXTERN[ +%} +%% +exp: '0'; +%% +]], +[input.y:2: #error "2" +]) + +m4_popdef([AT_TEST]) + +## ----------- ## +## %no-lines. ## +## ----------- ## + +m4_pushdef([AT_TEST], +[AT_SETUP([%no-lines: $1]) + +AT_BISON_OPTION_PUSHDEFS([%skeleton "$1" %defines]) +AT_DATA_GRAMMAR([input.y], +[%skeleton "$1" %defines +%{ +]AT_YYERROR_DECLARE_EXTERN[ +]AT_YYLEX_DECLARE_EXTERN[ +%} +%% +exp: '0' +]) +AT_BISON_CHECK([--no-lines -o input.AT_SKEL_CC_IF([cc], [c]) -d input.y]) +AT_CHECK([[grep '#line' ]AT_SKEL_CC_IF([*.cc *.hh], [*.c *.h])], 1) +AT_BISON_OPTION_POPDEFS + +AT_CLEANUP +]) + +AT_TEST([yacc.c]) +AT_TEST([glr.c]) +AT_TEST([lalr1.cc]) +AT_TEST([glr.cc]) + m4_popdef([AT_TEST])