36 lines
1.4 KiB
Text
36 lines
1.4 KiB
Text
$NetBSD: patch-src_parse_l,v 1.1 2011/10/13 22:11:26 dholland Exp $
|
|
|
|
Recognize and ignore _Pragma(), needed for -current's headers.
|
|
|
|
--- src/parse.l~ 2011-06-18 09:45:04.000000000 +0000
|
|
+++ src/parse.l
|
|
@@ -14,6 +14,7 @@ IS ((u|U|l|L)+|([iI
|
|
%x CPP_INCLUDE CPP_INC_FILE CPP_INC_FLAGS
|
|
%x CPP_DEFINE CPP_DEFINE_ARGP CPP_DEFINE_BODY CPP_DEFINE_ARGS
|
|
%x GNU_LABEL GNU_VA_ARG GNU_ATTRIBUTE GNU_TYPEOF GNU_OFFSETOF
|
|
+%x C99_PRAGMA
|
|
|
|
%{
|
|
/***************************************
|
|
@@ -83,6 +84,9 @@ static int gnu_typ_depth=0;
|
|
/*+ To get around the GCC __offsetof keyword, skip over matched () counted by this. +*/
|
|
static int gnu_offset_depth=0;
|
|
|
|
+/*+ To get around the C99 _Pragma keyword, skip over matched () counted by this. +*/
|
|
+static int c99_prag_depth=0;
|
|
+
|
|
/*+ If we see a comment immediately after a ',', ';', '};', '},' or ')' then push it before. +*/
|
|
static int push_past=0;
|
|
|
|
@@ -311,6 +315,11 @@ static int push_past=0;
|
|
"_Complex" { }
|
|
"_Bool" { yylval="_Bool"; return(BOOL); }
|
|
|
|
+("_Pragma") { c99_prag_depth=0; BEGIN(C99_PRAGMA); }
|
|
+<C99_PRAGMA>"(" { c99_prag_depth++; }
|
|
+<C99_PRAGMA>[^()]+ { }
|
|
+<C99_PRAGMA>")" { if(--c99_prag_depth==0) { BEGIN(INITIAL); } }
|
|
+
|
|
/* C language keywords. */
|
|
|
|
"auto" { yylval="auto" ; return(AUTO); }
|