diff options
Diffstat (limited to 'cil/src/frontc/clexer.mll')
| -rw-r--r-- | cil/src/frontc/clexer.mll | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/cil/src/frontc/clexer.mll b/cil/src/frontc/clexer.mll index 08f7881..41c8692 100644 --- a/cil/src/frontc/clexer.mll +++ b/cil/src/frontc/clexer.mll @@ -418,13 +418,15 @@ let hex_escape = '\\' ['x' 'X'] hexdigit+ let oct_escape = '\\' octdigit octdigit? octdigit? (* Pragmas that are not parsed by CIL. We lex them as PRAGMA_LINE tokens *) + let no_parse_pragma = "warning" | "GCC" (* Solaris-style pragmas: *) | "ident" | "section" | "option" | "asm" | "use_section" | "weak" | "redefine_extname" | "TCS_align" - + (* Added by XL *) + | "global_register" rule initial = parse "/*" { let il = comment lexbuf in |