daily update
[external/binutils.git] / gdb / ada-lex.l
index e16acb5..f198ea7 100644 (file)
@@ -1,6 +1,6 @@
 /* FLEX lexer for Ada expressions, for GDB.
-   Copyright (C) 1994, 1997, 1998, 2000, 2001, 2002, 2003, 2007, 2008, 2009
-   Free Software Foundation, Inc.
+   Copyright (C) 1994, 1997, 1998, 2000, 2001, 2002, 2003, 2007, 2008, 2009,
+   2010 Free Software Foundation, Inc.
 
    This file is part of GDB.
 
@@ -58,6 +58,10 @@ static int find_dot_all (const char *);
 #undef YY_DECL
 #define YY_DECL static int yylex ( void )
 
+/* Flex generates a static function "input" which is not used.
+   Defining YY_NO_INPUT comments it out.  */
+#define YY_NO_INPUT
+
 #undef YY_INPUT
 #define YY_INPUT(BUF, RESULT, MAX_SIZE) \
     if ( *lexptr == '\000' ) \
@@ -160,7 +164,9 @@ if          {
                  return 0;
                }
 
-task           {
+(task|thread)  {
+                  /* This keyword signals the end of the expression and
+                     will be processed separately.  */
                  while (*lexptr != 't' && *lexptr != 'T')
                    lexptr--;
                  yyrestart(NULL);