Fortran: Follow <>-style includes (#13239)

Fortran sources that pass through the C preprocessor may use

 #include "header"

syntax or

 #include <header>

syntax.  CMake already follows the former.  Teach it to follow the
latter.
This commit is contained in:
Brad King 2012-05-22 14:07:24 -04:00
parent f2656e4ccb
commit ad2107903a
6 changed files with 761 additions and 647 deletions

View File

@ -20,7 +20,7 @@
#define FLEX_SCANNER #define FLEX_SCANNER
#define YY_FLEX_MAJOR_VERSION 2 #define YY_FLEX_MAJOR_VERSION 2
#define YY_FLEX_MINOR_VERSION 5 #define YY_FLEX_MINOR_VERSION 5
#define YY_FLEX_SUBMINOR_VERSION 34 #define YY_FLEX_SUBMINOR_VERSION 35
#if YY_FLEX_SUBMINOR_VERSION > 0 #if YY_FLEX_SUBMINOR_VERSION > 0
#define FLEX_BETA #define FLEX_BETA
#endif #endif
@ -65,7 +65,6 @@ typedef int flex_int32_t;
typedef unsigned char flex_uint8_t; typedef unsigned char flex_uint8_t;
typedef unsigned short int flex_uint16_t; typedef unsigned short int flex_uint16_t;
typedef unsigned int flex_uint32_t; typedef unsigned int flex_uint32_t;
#endif /* ! C99 */
/* Limits of integral types. */ /* Limits of integral types. */
#ifndef INT8_MIN #ifndef INT8_MIN
@ -96,6 +95,8 @@ typedef unsigned int flex_uint32_t;
#define UINT32_MAX (4294967295U) #define UINT32_MAX (4294967295U)
#endif #endif
#endif /* ! C99 */
#endif /* ! FLEXINT_H */ #endif /* ! FLEXINT_H */
#ifdef __cplusplus #ifdef __cplusplus
@ -169,7 +170,15 @@ typedef void* yyscan_t;
/* Size of default input buffer. */ /* Size of default input buffer. */
#ifndef YY_BUF_SIZE #ifndef YY_BUF_SIZE
#ifdef __ia64__
/* On IA-64, the buffer size is 16k, not 8k.
* Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case.
* Ditto for the __ia64__ case accordingly.
*/
#define YY_BUF_SIZE 32768
#else
#define YY_BUF_SIZE 16384 #define YY_BUF_SIZE 16384
#endif /* __ia64__ */
#endif #endif
/* The state buf must be large enough to hold one state per character in the main buffer. /* The state buf must be large enough to hold one state per character in the main buffer.
@ -203,13 +212,6 @@ typedef struct yy_buffer_state *YY_BUFFER_STATE;
#define unput(c) yyunput( c, yyg->yytext_ptr , yyscanner ) #define unput(c) yyunput( c, yyg->yytext_ptr , yyscanner )
/* The following is because we cannot portably get our hands on size_t
* (without autoconf's help, which isn't available because we want
* flex-generated scanners to compile on their own).
* Given that the standard has decreed that size_t exists since 1989,
* I guess we can afford to depend on it. Manoj.
*/
#ifndef YY_TYPEDEF_YY_SIZE_T #ifndef YY_TYPEDEF_YY_SIZE_T
#define YY_TYPEDEF_YY_SIZE_T #define YY_TYPEDEF_YY_SIZE_T
typedef size_t yy_size_t; typedef size_t yy_size_t;
@ -367,8 +369,8 @@ static void yy_fatal_error (yyconst char msg[] ,yyscan_t yyscanner );
*yy_cp = '\0'; \ *yy_cp = '\0'; \
yyg->yy_c_buf_p = yy_cp; yyg->yy_c_buf_p = yy_cp;
#define YY_NUM_RULES 43 #define YY_NUM_RULES 44
#define YY_END_OF_BUFFER 44 #define YY_END_OF_BUFFER 45
/* This struct is not used in this scanner, /* This struct is not used in this scanner,
but its presence is necessary. */ but its presence is necessary. */
struct yy_trans_info struct yy_trans_info
@ -376,25 +378,26 @@ struct yy_trans_info
flex_int32_t yy_verify; flex_int32_t yy_verify;
flex_int32_t yy_nxt; flex_int32_t yy_nxt;
}; };
static yyconst flex_int16_t yy_accept[161] = static yyconst flex_int16_t yy_accept[165] =
{ 0, { 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
44, 38, 40, 39, 42, 1, 38, 31, 2, 33, 45, 39, 41, 40, 43, 1, 39, 32, 2, 34,
38, 39, 36, 38, 37, 38, 37, 40, 38, 39, 39, 40, 37, 39, 38, 39, 38, 41, 39, 40,
38, 37, 9, 8, 9, 4, 3, 38, 0, 10, 39, 38, 9, 8, 9, 4, 3, 39, 0, 10,
0, 0, 0, 0, 0, 31, 31, 32, 34, 36, 0, 0, 0, 0, 0, 32, 32, 33, 35, 37,
38, 37, 0, 41, 37, 0, 0, 0, 0, 0, 39, 38, 0, 42, 38, 0, 0, 0, 0, 0,
0, 0, 0, 38, 0, 11, 37, 0, 0, 5, 0, 0, 0, 39, 0, 11, 38, 0, 0, 5,
0, 0, 0, 27, 0, 0, 31, 31, 31, 31, 0, 0, 0, 28, 0, 0, 32, 32, 32, 32,
0, 0, 0, 0, 0, 21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 22, 0, 0, 0, 0,
0, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 28, 29, 0, 0, 0, 0, 0, 0, 0, 0, 29, 30, 0, 0, 0, 0, 0, 0,
0, 22, 23, 0, 0, 0, 0, 0, 0, 0, 0, 23, 24, 0, 0, 0, 0, 0, 0, 0,
0, 30, 25, 0, 0, 18, 0, 0, 24, 19, 0, 31, 26, 0, 0, 19, 0, 0, 25, 20,
0, 0, 17, 0, 0, 16, 26, 0, 0, 15, 0, 0, 18, 0, 0, 17, 27, 0, 0, 16,
20, 0, 7, 35, 7, 13, 0, 12, 14, 0 21, 0, 7, 36, 7, 14, 0, 13, 15, 0,
0, 0, 12, 0
} ; } ;
static yyconst flex_int32_t yy_ec[256] = static yyconst flex_int32_t yy_ec[256] =
@ -404,15 +407,15 @@ static yyconst flex_int32_t yy_ec[256] =
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 5, 6, 7, 8, 9, 1, 10, 11, 1, 1, 5, 6, 7, 8, 9, 1, 10, 11, 1,
1, 12, 1, 13, 1, 1, 1, 14, 14, 14, 1, 12, 1, 13, 1, 1, 1, 14, 14, 14,
14, 14, 14, 14, 14, 14, 14, 15, 16, 1, 14, 14, 14, 14, 14, 14, 14, 15, 16, 17,
17, 18, 19, 1, 20, 20, 21, 22, 23, 24, 18, 19, 20, 1, 21, 21, 22, 23, 24, 25,
20, 20, 25, 20, 20, 26, 20, 27, 20, 20, 21, 21, 26, 21, 21, 27, 21, 28, 21, 21,
20, 20, 28, 20, 29, 20, 20, 20, 20, 20, 21, 21, 29, 21, 30, 21, 21, 21, 21, 21,
1, 30, 1, 1, 31, 1, 20, 20, 32, 33, 1, 31, 1, 1, 32, 1, 21, 21, 33, 34,
34, 35, 20, 20, 36, 20, 20, 37, 20, 38, 35, 36, 21, 21, 37, 21, 21, 38, 21, 39,
20, 20, 20, 20, 39, 20, 40, 20, 20, 20, 21, 21, 21, 21, 40, 21, 41, 21, 21, 21,
20, 20, 1, 1, 1, 1, 1, 1, 1, 1, 21, 21, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
@ -429,178 +432,187 @@ static yyconst flex_int32_t yy_ec[256] =
1, 1, 1, 1, 1 1, 1, 1, 1, 1
} ; } ;
static yyconst flex_int32_t yy_meta[41] = static yyconst flex_int32_t yy_meta[42] =
{ 0, { 0,
1, 2, 2, 3, 4, 3, 3, 1, 1, 3, 1, 2, 2, 3, 4, 3, 3, 1, 1, 3,
3, 1, 3, 5, 1, 3, 3, 1, 1, 6, 3, 1, 3, 5, 1, 3, 1, 3, 6, 1,
6, 6, 6, 6, 6, 6, 6, 6, 6, 1, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,
5, 6, 6, 6, 6, 6, 6, 6, 6, 6 1, 5, 7, 7, 7, 7, 7, 7, 7, 7,
7
} ; } ;
static yyconst flex_int16_t yy_base[169] = static yyconst flex_int16_t yy_base[174] =
{ 0, { 0,
0, 39, 0, 40, 184, 47, 43, 53, 55, 63, 0, 40, 0, 41, 188, 48, 44, 54, 56, 65,
186, 0, 476, 476, 164, 476, 79, 72, 476, 476, 186, 0, 505, 505, 171, 505, 81, 74, 505, 505,
143, 476, 130, 126, 0, 83, 119, 85, 149, 139, 158, 505, 151, 137, 0, 85, 122, 87, 153, 145,
189, 220, 476, 131, 89, 476, 476, 0, 132, 476, 194, 226, 505, 143, 91, 505, 505, 0, 142, 505,
259, 37, 69, 76, 34, 119, 137, 476, 0, 476, 266, 34, 70, 74, 34, 122, 141, 505, 0, 505,
121, 0, 150, 476, 0, 154, 298, 0, 75, 138, 112, 0, 98, 505, 0, 154, 306, 0, 43, 133,
142, 72, 127, 338, 94, 476, 0, 84, 158, 186, 139, 46, 130, 347, 130, 505, 0, 121, 163, 179,
81, 145, 108, 172, 147, 173, 260, 266, 284, 299, 104, 156, 129, 176, 147, 178, 214, 267, 273, 292,
272, 173, 178, 286, 245, 258, 285, 285, 78, 71, 279, 179, 249, 280, 257, 265, 288, 289, 116, 107,
207, 476, 288, 291, 296, 304, 310, 315, 317, 326, 317, 505, 287, 289, 291, 302, 307, 310, 307, 311,
330, 330, 335, 338, 338, 341, 343, 341, 348, 62, 316, 326, 329, 333, 332, 336, 347, 345, 349, 101,
52, 346, 476, 476, 353, 355, 357, 352, 359, 359, 86, 346, 505, 505, 350, 351, 353, 350, 357, 362,
359, 476, 476, 363, 365, 370, 366, 375, 46, 38, 362, 505, 505, 367, 369, 371, 366, 372, 56, 47,
378, 476, 476, 378, 381, 476, 376, 384, 476, 476, 374, 505, 505, 374, 379, 505, 374, 387, 505, 505,
384, 387, 476, 115, 0, 476, 476, 388, 393, 476, 387, 391, 505, 117, 0, 505, 505, 392, 394, 505,
476, 394, 476, 476, 476, 476, 398, 476, 476, 476, 505, 394, 505, 505, 505, 505, 395, 419, 505, 429,
432, 438, 443, 445, 451, 457, 463, 469 0, 25, 505, 505, 446, 453, 459, 462, 469, 476,
483, 490, 497
} ; } ;
static yyconst flex_int16_t yy_def[169] = static yyconst flex_int16_t yy_def[174] =
{ 0, { 0,
160, 1, 1, 1, 1, 1, 161, 161, 161, 161, 164, 1, 1, 1, 1, 1, 165, 165, 165, 165,
160, 162, 160, 160, 163, 160, 162, 160, 160, 160, 164, 166, 164, 164, 167, 164, 166, 164, 164, 164,
162, 160, 160, 162, 164, 162, 164, 160, 162, 160, 166, 164, 164, 166, 168, 166, 168, 164, 166, 164,
165, 160, 160, 160, 160, 160, 160, 162, 163, 160, 169, 164, 164, 164, 164, 164, 164, 166, 167, 164,
160, 160, 160, 160, 160, 160, 166, 160, 162, 160, 164, 164, 164, 164, 164, 164, 170, 164, 166, 164,
162, 164, 160, 160, 27, 160, 160, 57, 160, 160, 166, 168, 164, 164, 27, 164, 164, 57, 164, 164,
160, 160, 160, 165, 165, 160, 32, 160, 160, 160, 164, 164, 164, 169, 169, 164, 32, 164, 164, 164,
160, 160, 160, 160, 160, 160, 166, 166, 166, 166, 164, 164, 164, 164, 164, 164, 170, 170, 170, 170,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 167, 168, 160, 160, 160, 160, 160, 164, 164, 164, 171, 172, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160, 160, 0, 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160, 160, 160 173, 173, 164, 0, 164, 164, 164, 164, 164, 164,
164, 164, 164
} ; } ;
static yyconst flex_int16_t yy_nxt[517] = static yyconst flex_int16_t yy_nxt[547] =
{ 0, { 0,
12, 13, 14, 13, 13, 15, 16, 12, 17, 18, 12, 13, 14, 13, 13, 15, 16, 12, 17, 18,
19, 12, 20, 12, 21, 22, 23, 12, 24, 25, 19, 12, 20, 12, 21, 22, 12, 23, 12, 24,
25, 25, 25, 25, 25, 25, 25, 25, 25, 26, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25,
27, 25, 25, 25, 25, 25, 25, 25, 25, 25, 26, 27, 25, 25, 25, 25, 25, 25, 25, 25,
28, 28, 145, 28, 28, 34, 29, 29, 28, 30, 25, 28, 28, 163, 28, 28, 34, 29, 29, 28,
144, 28, 35, 36, 29, 34, 130, 34, 31, 71, 30, 145, 28, 35, 36, 29, 34, 71, 34, 31,
76, 37, 35, 36, 35, 34, 129, 32, 32, 37, 144, 76, 37, 35, 36, 35, 83, 34, 71, 32,
71, 76, 35, 46, 46, 111, 46, 47, 32, 32, 32, 37, 76, 88, 35, 46, 46, 83, 46, 47,
41, 48, 110, 41, 53, 54, 56, 53, 90, 56, 32, 32, 41, 48, 88, 41, 53, 54, 56, 53,
69, 70, 57, 69, 72, 73, 66, 83, 88, 74, 130, 56, 69, 70, 57, 69, 72, 73, 74, 53,
42, 43, 75, 44, 93, 72, 73, 45, 83, 88, 54, 75, 53, 42, 43, 129, 44, 72, 73, 74,
74, 42, 43, 75, 44, 93, 154, 154, 45, 38, 45, 111, 75, 81, 42, 43, 81, 44, 154, 154,
46, 46, 81, 46, 47, 81, 38, 38, 48, 96, 110, 45, 38, 46, 46, 90, 46, 47, 93, 38,
38, 89, 55, 38, 40, 68, 38, 38, 78, 46, 38, 48, 66, 38, 89, 55, 38, 82, 38, 93,
96, 78, 79, 63, 51, 82, 80, 50, 38, 55, 38, 38, 78, 46, 40, 78, 79, 68, 82, 63,
58, 53, 54, 58, 53, 56, 82, 49, 56, 69, 80, 96, 38, 55, 58, 56, 51, 58, 56, 84,
70, 57, 69, 84, 85, 86, 40, 99, 87, 94, 85, 57, 96, 86, 69, 70, 87, 69, 99, 50,
59, 60, 95, 61, 84, 85, 86, 62, 99, 87, 84, 85, 49, 40, 86, 59, 60, 87, 61, 99,
94, 59, 60, 95, 61, 160, 30, 91, 62, 64, 91, 94, 62, 91, 95, 164, 59, 60, 92, 61,
91, 66, 160, 97, 100, 92, 64, 64, 98, 101, 30, 164, 94, 62, 64, 95, 66, 164, 97, 164,
64, 102, 64, 64, 97, 100, 64, 64, 91, 98, 100, 64, 64, 98, 164, 64, 101, 64, 64, 97,
101, 91, 102, 160, 160, 160, 92, 160, 64, 64, 64, 100, 64, 64, 98, 78, 46, 101, 78, 79,
65, 65, 66, 65, 65, 65, 65, 65, 65, 65, 164, 164, 164, 80, 64, 64, 65, 65, 66, 65,
65, 65, 65, 67, 65, 65, 65, 65, 65, 67, 65, 65, 65, 65, 65, 65, 65, 65, 65, 67,
67, 67, 67, 67, 67, 67, 67, 67, 67, 65, 65, 65, 65, 65, 65, 65, 67, 67, 67, 67,
67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 65, 67, 67, 67,
41, 78, 46, 41, 78, 79, 105, 78, 46, 80, 67, 67, 67, 67, 67, 67, 67, 41, 78, 46,
78, 79, 160, 81, 160, 80, 81, 105, 160, 106, 41, 78, 79, 102, 78, 46, 80, 78, 79, 105,
42, 43, 160, 44, 107, 78, 46, 45, 78, 79, 81, 164, 80, 81, 102, 164, 164, 106, 42, 43,
106, 42, 43, 80, 44, 107, 82, 160, 45, 58, 105, 44, 107, 78, 46, 45, 78, 79, 106, 42,
78, 46, 58, 78, 79, 108, 109, 82, 80, 160, 43, 80, 44, 107, 82, 103, 45, 58, 104, 108,
103, 160, 112, 104, 113, 160, 108, 109, 114, 59, 58, 109, 112, 113, 114, 82, 103, 164, 91, 104,
60, 103, 61, 112, 104, 113, 62, 160, 115, 114, 108, 91, 109, 112, 113, 114, 92, 115, 59, 60,
59, 60, 116, 61, 160, 160, 117, 62, 64, 115, 116, 61, 117, 118, 119, 62, 164, 120, 115, 59,
66, 160, 118, 116, 160, 64, 64, 117, 119, 64, 60, 116, 61, 117, 118, 119, 62, 64, 120, 66,
120, 64, 64, 118, 121, 64, 64, 160, 122, 119, 164, 121, 164, 122, 64, 64, 123, 124, 64, 125,
123, 120, 124, 125, 126, 121, 127, 64, 64, 122, 64, 64, 121, 64, 122, 64, 64, 123, 124, 126,
128, 123, 131, 124, 125, 126, 132, 127, 133, 134, 125, 127, 128, 131, 132, 133, 134, 64, 64, 135,
135, 128, 136, 131, 137, 138, 139, 132, 140, 133, 126, 136, 127, 128, 131, 132, 133, 134, 137, 138,
134, 135, 141, 136, 142, 137, 138, 139, 143, 140, 135, 139, 136, 140, 141, 142, 143, 146, 147, 137,
146, 147, 148, 141, 149, 142, 150, 151, 152, 143, 138, 148, 139, 149, 140, 141, 142, 143, 146, 147,
156, 146, 147, 148, 157, 149, 158, 150, 151, 152, 150, 151, 148, 152, 149, 156, 157, 158, 159, 164,
159, 156, 160, 160, 160, 157, 160, 158, 160, 160, 160, 150, 151, 160, 152, 164, 156, 157, 158, 159,
160, 159, 33, 33, 33, 33, 33, 33, 38, 160, 160, 164, 164, 160, 164, 161, 164, 164, 164, 164,
160, 160, 38, 39, 39, 39, 39, 39, 39, 52, 164, 164, 164, 164, 164, 161, 33, 33, 33, 33,
52, 65, 65, 65, 65, 65, 65, 77, 77, 77, 33, 33, 33, 38, 164, 164, 164, 38, 38, 39,
77, 77, 77, 153, 153, 153, 160, 153, 153, 155, 39, 39, 39, 39, 39, 39, 52, 164, 52, 65,
160, 155, 160, 155, 155, 11, 160, 160, 160, 160, 65, 65, 65, 65, 65, 65, 77, 77, 77, 77,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 77, 77, 77, 153, 153, 153, 164, 153, 153, 153,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 155, 164, 155, 164, 155, 155, 155, 162, 162, 162,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 162, 162, 164, 162, 11, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
164, 164, 164, 164, 164, 164
} ; } ;
static yyconst flex_int16_t yy_chk[517] = static yyconst flex_int16_t yy_chk[547] =
{ 0, { 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
2, 4, 130, 2, 4, 7, 2, 4, 6, 6, 1, 2, 4, 162, 2, 4, 7, 2, 4, 6,
129, 6, 7, 7, 6, 8, 111, 9, 6, 42, 6, 130, 6, 7, 7, 6, 8, 42, 9, 6,
45, 9, 8, 8, 9, 10, 110, 6, 6, 10, 129, 45, 9, 8, 8, 9, 59, 10, 42, 6,
42, 45, 10, 18, 18, 90, 18, 18, 6, 6, 6, 10, 45, 62, 10, 18, 18, 59, 18, 18,
17, 18, 89, 17, 26, 26, 28, 26, 68, 28, 6, 6, 17, 18, 62, 17, 26, 26, 28, 26,
35, 35, 28, 35, 43, 43, 65, 59, 62, 44, 111, 28, 35, 35, 28, 35, 43, 43, 44, 53,
17, 17, 44, 17, 71, 43, 43, 17, 59, 62, 53, 44, 53, 17, 17, 110, 17, 43, 43, 44,
44, 17, 17, 44, 17, 71, 144, 144, 17, 27, 17, 90, 44, 51, 17, 17, 51, 17, 144, 144,
46, 46, 51, 46, 46, 51, 27, 27, 46, 73, 89, 17, 27, 46, 46, 68, 46, 46, 71, 27,
27, 63, 27, 27, 39, 34, 27, 27, 47, 47, 27, 46, 65, 27, 63, 27, 27, 51, 27, 71,
73, 47, 47, 30, 24, 51, 47, 23, 27, 27, 27, 27, 47, 47, 39, 47, 47, 34, 51, 30,
29, 53, 53, 29, 53, 56, 51, 21, 56, 69, 47, 73, 27, 27, 29, 56, 24, 29, 56, 60,
69, 56, 69, 60, 60, 61, 15, 75, 61, 72, 60, 56, 73, 61, 69, 69, 61, 69, 75, 23,
29, 29, 72, 29, 60, 60, 61, 29, 75, 61, 60, 60, 21, 15, 61, 29, 29, 61, 29, 75,
72, 29, 29, 72, 29, 11, 5, 70, 29, 31, 70, 72, 29, 70, 72, 11, 29, 29, 70, 29,
70, 31, 0, 74, 76, 70, 31, 31, 74, 82, 5, 0, 72, 29, 31, 72, 31, 0, 74, 0,
31, 83, 31, 31, 74, 76, 31, 31, 91, 74, 76, 31, 31, 74, 0, 31, 82, 31, 31, 74,
82, 91, 83, 0, 0, 0, 91, 0, 31, 31, 31, 76, 31, 31, 74, 77, 77, 82, 77, 77,
0, 0, 0, 77, 31, 31, 32, 32, 32, 32,
32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,
32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,
32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32,
32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 41, 78, 78,
41, 77, 77, 41, 77, 77, 85, 78, 78, 77, 41, 78, 78, 83, 79, 79, 78, 79, 79, 85,
78, 78, 0, 81, 0, 78, 81, 85, 0, 86, 81, 0, 79, 81, 83, 0, 0, 86, 41, 41,
41, 41, 0, 41, 86, 79, 79, 41, 79, 79, 85, 41, 86, 80, 80, 41, 80, 80, 86, 41,
86, 41, 41, 79, 41, 86, 81, 0, 41, 57,
80, 80, 57, 80, 80, 87, 88, 81, 80, 0, 41, 80, 41, 86, 81, 84, 41, 57, 84, 87,
84, 0, 93, 84, 94, 0, 87, 88, 95, 57, 57, 88, 93, 94, 95, 81, 84, 0, 91, 84,
57, 84, 57, 93, 84, 94, 57, 0, 96, 95, 87, 91, 88, 93, 94, 95, 91, 96, 57, 57,
57, 57, 97, 57, 0, 0, 98, 57, 64, 96, 97, 57, 98, 99, 100, 57, 0, 101, 96, 57,
64, 0, 99, 97, 0, 64, 64, 98, 100, 64, 57, 97, 57, 98, 99, 100, 57, 64, 101, 64,
101, 64, 64, 99, 102, 64, 64, 0, 103, 100, 0, 102, 0, 103, 64, 64, 104, 105, 64, 106,
104, 101, 105, 106, 107, 102, 108, 64, 64, 103, 64, 64, 102, 64, 103, 64, 64, 104, 105, 107,
109, 104, 112, 105, 106, 107, 115, 108, 116, 117, 106, 108, 109, 112, 115, 116, 117, 64, 64, 118,
118, 109, 119, 112, 120, 121, 124, 115, 125, 116, 107, 119, 108, 109, 112, 115, 116, 117, 120, 121,
117, 118, 126, 119, 127, 120, 121, 124, 128, 125, 118, 124, 119, 125, 126, 127, 128, 131, 134, 120,
131, 134, 135, 126, 137, 127, 138, 141, 142, 128, 121, 135, 124, 137, 125, 126, 127, 128, 131, 134,
148, 131, 134, 135, 149, 137, 152, 138, 141, 142, 138, 141, 135, 142, 137, 148, 149, 152, 157, 0,
157, 148, 0, 0, 0, 149, 0, 152, 0, 0, 158, 138, 141, 158, 142, 0, 148, 149, 152, 157,
0, 157, 161, 161, 161, 161, 161, 161, 162, 0, 160, 0, 0, 160, 0, 158, 0, 0, 0, 0,
0, 0, 162, 163, 163, 163, 163, 163, 163, 164, 0, 0, 0, 0, 0, 160, 165, 165, 165, 165,
164, 165, 165, 165, 165, 165, 165, 166, 166, 166, 165, 165, 165, 166, 0, 0, 0, 166, 166, 167,
166, 166, 166, 167, 167, 167, 0, 167, 167, 168, 167, 167, 167, 167, 167, 167, 168, 0, 168, 169,
0, 168, 0, 168, 168, 160, 160, 160, 160, 160, 169, 169, 169, 169, 169, 169, 170, 170, 170, 170,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 170, 170, 170, 171, 171, 171, 0, 171, 171, 171,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 172, 0, 172, 0, 172, 172, 172, 173, 173, 173,
160, 160, 160, 160, 160, 160, 160, 160, 160, 160, 173, 173, 0, 173, 164, 164, 164, 164, 164, 164,
160, 160, 160, 160, 160, 160 164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
164, 164, 164, 164, 164, 164, 164, 164, 164, 164,
164, 164, 164, 164, 164, 164
} ; } ;
/* The intent behind this definition is that it'll catch /* The intent behind this definition is that it'll catch
@ -673,7 +685,7 @@ Modify cmDependsFortranLexer.h:
/*--------------------------------------------------------------------------*/ /*--------------------------------------------------------------------------*/
#line 670 "cmDependsFortranLexer.cxx" #line 678 "cmDependsFortranLexer.cxx"
#define INITIAL 0 #define INITIAL 0
#define free_fmt 1 #define free_fmt 1
@ -796,7 +808,12 @@ static int input (yyscan_t yyscanner );
/* Amount of stuff to slurp up with each read. */ /* Amount of stuff to slurp up with each read. */
#ifndef YY_READ_BUF_SIZE #ifndef YY_READ_BUF_SIZE
#ifdef __ia64__
/* On IA-64, the buffer size is 16k, not 8k */
#define YY_READ_BUF_SIZE 16384
#else
#define YY_READ_BUF_SIZE 8192 #define YY_READ_BUF_SIZE 8192
#endif /* __ia64__ */
#endif #endif
/* Copy whatever the last rule matched to the standard output. */ /* Copy whatever the last rule matched to the standard output. */
@ -804,7 +821,7 @@ static int input (yyscan_t yyscanner );
/* This used to be an fputs(), but since the string might contain NUL's, /* This used to be an fputs(), but since the string might contain NUL's,
* we now use fwrite(). * we now use fwrite().
*/ */
#define ECHO fwrite( yytext, yyleng, 1, yyout ) #define ECHO do { if (fwrite( yytext, yyleng, 1, yyout )) {} } while (0)
#endif #endif
/* Gets input and stuffs it into "buf". number of characters read, or YY_NULL, /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
@ -815,7 +832,7 @@ static int input (yyscan_t yyscanner );
if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \ if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
{ \ { \
int c = '*'; \ int c = '*'; \
int n; \ size_t n; \
for ( n = 0; n < max_size && \ for ( n = 0; n < max_size && \
(c = getc( yyin )) != EOF && c != '\n'; ++n ) \ (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
buf[n] = (char) c; \ buf[n] = (char) c; \
@ -901,10 +918,10 @@ YY_DECL
register int yy_act; register int yy_act;
struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
#line 75 "cmDependsFortranLexer.in.l" #line 71 "cmDependsFortranLexer.in.l"
#line 901 "cmDependsFortranLexer.cxx" #line 914 "cmDependsFortranLexer.cxx"
if ( !yyg->yy_init ) if ( !yyg->yy_init )
{ {
@ -958,13 +975,13 @@ yy_match:
while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
{ {
yy_current_state = (int) yy_def[yy_current_state]; yy_current_state = (int) yy_def[yy_current_state];
if ( yy_current_state >= 161 ) if ( yy_current_state >= 165 )
yy_c = yy_meta[(unsigned int) yy_c]; yy_c = yy_meta[(unsigned int) yy_c];
} }
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
++yy_cp; ++yy_cp;
} }
while ( yy_base[yy_current_state] != 476 ); while ( yy_base[yy_current_state] != 505 );
yy_find_action: yy_find_action:
yy_act = yy_accept[yy_current_state]; yy_act = yy_accept[yy_current_state];
@ -990,7 +1007,7 @@ do_action: /* This label is used only to access EOF actions. */
case 1: case 1:
YY_RULE_SETUP YY_RULE_SETUP
#line 77 "cmDependsFortranLexer.in.l" #line 73 "cmDependsFortranLexer.in.l"
{ {
cmDependsFortranParser_StringStart(yyextra); cmDependsFortranParser_StringStart(yyextra);
cmDependsFortranParser_SetOldStartcond(yyextra, YY_START); cmDependsFortranParser_SetOldStartcond(yyextra, YY_START);
@ -999,7 +1016,7 @@ YY_RULE_SETUP
YY_BREAK YY_BREAK
case 2: case 2:
YY_RULE_SETUP YY_RULE_SETUP
#line 83 "cmDependsFortranLexer.in.l" #line 79 "cmDependsFortranLexer.in.l"
{ {
cmDependsFortranParser_StringStart(yyextra); cmDependsFortranParser_StringStart(yyextra);
cmDependsFortranParser_SetOldStartcond(yyextra, YY_START); cmDependsFortranParser_SetOldStartcond(yyextra, YY_START);
@ -1007,10 +1024,10 @@ YY_RULE_SETUP
} }
YY_BREAK YY_BREAK
case 3: case 3:
#line 90 "cmDependsFortranLexer.in.l" #line 86 "cmDependsFortranLexer.in.l"
case 4: case 4:
YY_RULE_SETUP YY_RULE_SETUP
#line 90 "cmDependsFortranLexer.in.l" #line 86 "cmDependsFortranLexer.in.l"
{ {
BEGIN(cmDependsFortranParser_GetOldStartcond(yyextra) ); BEGIN(cmDependsFortranParser_GetOldStartcond(yyextra) );
yylvalp->string = strdup(cmDependsFortranParser_StringEnd(yyextra)); yylvalp->string = strdup(cmDependsFortranParser_StringEnd(yyextra));
@ -1018,17 +1035,17 @@ YY_RULE_SETUP
} }
case 5: case 5:
/* rule 5 can match eol */ /* rule 5 can match eol */
#line 97 "cmDependsFortranLexer.in.l" #line 93 "cmDependsFortranLexer.in.l"
case 6: case 6:
/* rule 6 can match eol */ /* rule 6 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 97 "cmDependsFortranLexer.in.l" #line 93 "cmDependsFortranLexer.in.l"
/* Ignore (continued strings, free fmt) */ /* Ignore (continued strings, free fmt) */
YY_BREAK YY_BREAK
case 7: case 7:
/* rule 7 can match eol */ /* rule 7 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 99 "cmDependsFortranLexer.in.l" #line 95 "cmDependsFortranLexer.in.l"
{ {
if (cmDependsFortranParser_GetOldStartcond(yyextra) == fixed_fmt) if (cmDependsFortranParser_GetOldStartcond(yyextra) == fixed_fmt)
; /* Ignore (cont. strings, fixed fmt) */ ; /* Ignore (cont. strings, fixed fmt) */
@ -1041,7 +1058,7 @@ YY_RULE_SETUP
case 8: case 8:
/* rule 8 can match eol */ /* rule 8 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 109 "cmDependsFortranLexer.in.l" #line 105 "cmDependsFortranLexer.in.l"
{ {
unput ('\n'); unput ('\n');
BEGIN(INITIAL); BEGIN(INITIAL);
@ -1049,7 +1066,7 @@ YY_RULE_SETUP
} }
case 9: case 9:
YY_RULE_SETUP YY_RULE_SETUP
#line 115 "cmDependsFortranLexer.in.l" #line 111 "cmDependsFortranLexer.in.l"
{ {
cmDependsFortranParser_StringAppend(yyextra, yytext[0]); cmDependsFortranParser_StringAppend(yyextra, yytext[0]);
} }
@ -1057,96 +1074,99 @@ YY_RULE_SETUP
case 10: case 10:
/* rule 10 can match eol */ /* rule 10 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 119 "cmDependsFortranLexer.in.l" #line 115 "cmDependsFortranLexer.in.l"
{ return EOSTMT; } /* Treat comments like */ { return EOSTMT; } /* Treat comments like */
case 11: case 11:
/* rule 11 can match eol */ /* rule 11 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 120 "cmDependsFortranLexer.in.l" #line 116 "cmDependsFortranLexer.in.l"
{ return EOSTMT; } /* empty lines */ { return EOSTMT; } /* empty lines */
case 12: case 12:
/* rule 12 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 122 "cmDependsFortranLexer.in.l" #line 118 "cmDependsFortranLexer.in.l"
{ return CPP_INCLUDE; } {
yytext[yyleng-1] = 0;
yylvalp->string = strdup(strchr(yytext, '<')+1);
return CPP_INCLUDE_ANGLE;
}
case 13: case 13:
YY_RULE_SETUP YY_RULE_SETUP
#line 123 "cmDependsFortranLexer.in.l" #line 123 "cmDependsFortranLexer.in.l"
{ return F90PPR_INCLUDE; } { return CPP_INCLUDE; }
case 14: case 14:
YY_RULE_SETUP YY_RULE_SETUP
#line 124 "cmDependsFortranLexer.in.l" #line 124 "cmDependsFortranLexer.in.l"
{ return COCO_INCLUDE; } { return F90PPR_INCLUDE; }
case 15: case 15:
YY_RULE_SETUP YY_RULE_SETUP
#line 126 "cmDependsFortranLexer.in.l" #line 125 "cmDependsFortranLexer.in.l"
{ return CPP_DEFINE; } { return COCO_INCLUDE; }
case 16: case 16:
YY_RULE_SETUP YY_RULE_SETUP
#line 127 "cmDependsFortranLexer.in.l" #line 127 "cmDependsFortranLexer.in.l"
{ return F90PPR_DEFINE; } { return CPP_DEFINE; }
case 17: case 17:
YY_RULE_SETUP YY_RULE_SETUP
#line 129 "cmDependsFortranLexer.in.l" #line 128 "cmDependsFortranLexer.in.l"
{ return CPP_UNDEF; } { return F90PPR_DEFINE; }
case 18: case 18:
YY_RULE_SETUP YY_RULE_SETUP
#line 130 "cmDependsFortranLexer.in.l" #line 130 "cmDependsFortranLexer.in.l"
{ return F90PPR_UNDEF; } { return CPP_UNDEF; }
case 19: case 19:
YY_RULE_SETUP YY_RULE_SETUP
#line 132 "cmDependsFortranLexer.in.l" #line 131 "cmDependsFortranLexer.in.l"
{ return CPP_IFDEF; } { return F90PPR_UNDEF; }
case 20: case 20:
YY_RULE_SETUP YY_RULE_SETUP
#line 133 "cmDependsFortranLexer.in.l" #line 133 "cmDependsFortranLexer.in.l"
{ return CPP_IFNDEF; } { return CPP_IFDEF; }
case 21: case 21:
YY_RULE_SETUP YY_RULE_SETUP
#line 134 "cmDependsFortranLexer.in.l" #line 134 "cmDependsFortranLexer.in.l"
{ return CPP_IF; } { return CPP_IFNDEF; }
case 22: case 22:
YY_RULE_SETUP YY_RULE_SETUP
#line 135 "cmDependsFortranLexer.in.l" #line 135 "cmDependsFortranLexer.in.l"
{ return CPP_ELIF; } { return CPP_IF; }
case 23: case 23:
YY_RULE_SETUP YY_RULE_SETUP
#line 136 "cmDependsFortranLexer.in.l" #line 136 "cmDependsFortranLexer.in.l"
{ return CPP_ELSE; } { return CPP_ELIF; }
case 24: case 24:
YY_RULE_SETUP YY_RULE_SETUP
#line 137 "cmDependsFortranLexer.in.l" #line 137 "cmDependsFortranLexer.in.l"
{ return CPP_ENDIF; } { return CPP_ELSE; }
case 25: case 25:
YY_RULE_SETUP YY_RULE_SETUP
#line 139 "cmDependsFortranLexer.in.l" #line 138 "cmDependsFortranLexer.in.l"
{ return F90PPR_IFDEF; } { return CPP_ENDIF; }
case 26: case 26:
YY_RULE_SETUP YY_RULE_SETUP
#line 140 "cmDependsFortranLexer.in.l" #line 140 "cmDependsFortranLexer.in.l"
{ return F90PPR_IFNDEF; } { return F90PPR_IFDEF; }
case 27: case 27:
YY_RULE_SETUP YY_RULE_SETUP
#line 141 "cmDependsFortranLexer.in.l" #line 141 "cmDependsFortranLexer.in.l"
{ return F90PPR_IF; } { return F90PPR_IFNDEF; }
case 28: case 28:
YY_RULE_SETUP YY_RULE_SETUP
#line 142 "cmDependsFortranLexer.in.l" #line 142 "cmDependsFortranLexer.in.l"
{ return F90PPR_ELIF; } { return F90PPR_IF; }
case 29: case 29:
YY_RULE_SETUP YY_RULE_SETUP
#line 143 "cmDependsFortranLexer.in.l" #line 143 "cmDependsFortranLexer.in.l"
{ return F90PPR_ELSE; } { return F90PPR_ELIF; }
case 30: case 30:
YY_RULE_SETUP YY_RULE_SETUP
#line 144 "cmDependsFortranLexer.in.l" #line 144 "cmDependsFortranLexer.in.l"
{ return F90PPR_ELSE; }
case 31:
YY_RULE_SETUP
#line 145 "cmDependsFortranLexer.in.l"
{ return F90PPR_ENDIF; } { return F90PPR_ENDIF; }
/* Line continuations, possible involving comments. */ /* Line continuations, possible involving comments. */
case 31:
/* rule 31 can match eol */
YY_RULE_SETUP
#line 147 "cmDependsFortranLexer.in.l"
YY_BREAK
case 32: case 32:
/* rule 32 can match eol */ /* rule 32 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
@ -1154,59 +1174,65 @@ YY_RULE_SETUP
YY_BREAK YY_BREAK
case 33: case 33:
/* rule 33 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 150 "cmDependsFortranLexer.in.l" #line 149 "cmDependsFortranLexer.in.l"
{ return COMMA; }
YY_BREAK
case 34: case 34:
YY_RULE_SETUP YY_RULE_SETUP
#line 152 "cmDependsFortranLexer.in.l" #line 151 "cmDependsFortranLexer.in.l"
{ return DCOLON; } { return COMMA; }
case 35: case 35:
/* rule 35 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 154 "cmDependsFortranLexer.in.l" #line 153 "cmDependsFortranLexer.in.l"
{ return GARBAGE; } { return DCOLON; }
case 36: case 36:
/* rule 36 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 156 "cmDependsFortranLexer.in.l" #line 155 "cmDependsFortranLexer.in.l"
{ return ASSIGNMENT_OP; } { return GARBAGE; }
case 37: case 37:
YY_RULE_SETUP YY_RULE_SETUP
#line 158 "cmDependsFortranLexer.in.l" #line 157 "cmDependsFortranLexer.in.l"
{ return ASSIGNMENT_OP; }
case 38:
YY_RULE_SETUP
#line 159 "cmDependsFortranLexer.in.l"
{ {
yylvalp->string = strdup(yytext); yylvalp->string = strdup(yytext);
return WORD; return WORD;
} }
case 38:
YY_RULE_SETUP
#line 163 "cmDependsFortranLexer.in.l"
{ return GARBAGE; }
case 39: case 39:
/* rule 39 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 165 "cmDependsFortranLexer.in.l" #line 164 "cmDependsFortranLexer.in.l"
{ return EOSTMT; } { return GARBAGE; }
case 40: case 40:
/* rule 40 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 168 "cmDependsFortranLexer.in.l" #line 166 "cmDependsFortranLexer.in.l"
/* Ignore */ { return EOSTMT; }
YY_BREAK
case 41: case 41:
/* rule 41 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 169 "cmDependsFortranLexer.in.l" #line 169 "cmDependsFortranLexer.in.l"
/* Ignore line-endings preceeded by \ */ /* Ignore */
YY_BREAK YY_BREAK
case 42: case 42:
/* rule 42 can match eol */
YY_RULE_SETUP YY_RULE_SETUP
#line 171 "cmDependsFortranLexer.in.l" #line 170 "cmDependsFortranLexer.in.l"
/* Ignore line-endings preceeded by \ */
YY_BREAK
case 43:
YY_RULE_SETUP
#line 172 "cmDependsFortranLexer.in.l"
{ return *yytext; } { return *yytext; }
case YY_STATE_EOF(INITIAL): case YY_STATE_EOF(INITIAL):
case YY_STATE_EOF(free_fmt): case YY_STATE_EOF(free_fmt):
case YY_STATE_EOF(fixed_fmt): case YY_STATE_EOF(fixed_fmt):
case YY_STATE_EOF(str_sq): case YY_STATE_EOF(str_sq):
case YY_STATE_EOF(str_dq): case YY_STATE_EOF(str_dq):
#line 173 "cmDependsFortranLexer.in.l" #line 174 "cmDependsFortranLexer.in.l"
{ {
if(!cmDependsFortranParser_FilePop(yyextra) ) if(!cmDependsFortranParser_FilePop(yyextra) )
{ {
@ -1214,12 +1240,12 @@ case YY_STATE_EOF(str_dq):
} }
} }
YY_BREAK YY_BREAK
case 43: case 44:
YY_RULE_SETUP YY_RULE_SETUP
#line 180 "cmDependsFortranLexer.in.l" #line 181 "cmDependsFortranLexer.in.l"
ECHO; ECHO;
YY_BREAK YY_BREAK
#line 1247 "cmDependsFortranLexer.cxx" #line 1270 "cmDependsFortranLexer.cxx"
case YY_END_OF_BUFFER: case YY_END_OF_BUFFER:
{ {
@ -1512,7 +1538,7 @@ static int yy_get_next_buffer (yyscan_t yyscanner)
while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
{ {
yy_current_state = (int) yy_def[yy_current_state]; yy_current_state = (int) yy_def[yy_current_state];
if ( yy_current_state >= 161 ) if ( yy_current_state >= 165 )
yy_c = yy_meta[(unsigned int) yy_c]; yy_c = yy_meta[(unsigned int) yy_c];
} }
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
@ -1541,11 +1567,11 @@ static int yy_get_next_buffer (yyscan_t yyscanner)
while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
{ {
yy_current_state = (int) yy_def[yy_current_state]; yy_current_state = (int) yy_def[yy_current_state];
if ( yy_current_state >= 161 ) if ( yy_current_state >= 165 )
yy_c = yy_meta[(unsigned int) yy_c]; yy_c = yy_meta[(unsigned int) yy_c];
} }
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
yy_is_jam = (yy_current_state == 160); yy_is_jam = (yy_current_state == 164);
return yy_is_jam ? 0 : yy_current_state; return yy_is_jam ? 0 : yy_current_state;
} }
@ -1991,7 +2017,7 @@ YY_BUFFER_STATE cmDependsFortran_yy_scan_string (yyconst char * yystr , yyscan_t
} }
/** Setup the input buffer state to scan the given bytes. The next call to cmDependsFortran_yylex() will /** Setup the input buffer state to scan the given bytes. The next call to cmDependsFortran_yylex() will
* scan from a @e copy of @a yybytes. * scan from a @e copy of @a bytes.
* @param yybytes the byte buffer to scan * @param yybytes the byte buffer to scan
* @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes. * @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes.
* @param yyscanner The scanner object. * @param yyscanner The scanner object.
@ -2154,7 +2180,7 @@ void cmDependsFortran_yyset_lineno (int line_number , yyscan_t yyscanner)
} }
/** Set the current column. /** Set the current column.
* @param column_no * @param line_number
* @param yyscanner The scanner object. * @param yyscanner The scanner object.
*/ */
void cmDependsFortran_yyset_column (int column_no , yyscan_t yyscanner) void cmDependsFortran_yyset_column (int column_no , yyscan_t yyscanner)
@ -2374,7 +2400,7 @@ void cmDependsFortran_yyfree (void * ptr , yyscan_t)
#define YYTABLES_NAME "yytables" #define YYTABLES_NAME "yytables"
#line 180 "cmDependsFortranLexer.in.l" #line 181 "cmDependsFortranLexer.in.l"

View File

@ -20,7 +20,7 @@
#define FLEX_SCANNER #define FLEX_SCANNER
#define YY_FLEX_MAJOR_VERSION 2 #define YY_FLEX_MAJOR_VERSION 2
#define YY_FLEX_MINOR_VERSION 5 #define YY_FLEX_MINOR_VERSION 5
#define YY_FLEX_SUBMINOR_VERSION 34 #define YY_FLEX_SUBMINOR_VERSION 35
#if YY_FLEX_SUBMINOR_VERSION > 0 #if YY_FLEX_SUBMINOR_VERSION > 0
#define FLEX_BETA #define FLEX_BETA
#endif #endif
@ -65,7 +65,6 @@ typedef int flex_int32_t;
typedef unsigned char flex_uint8_t; typedef unsigned char flex_uint8_t;
typedef unsigned short int flex_uint16_t; typedef unsigned short int flex_uint16_t;
typedef unsigned int flex_uint32_t; typedef unsigned int flex_uint32_t;
#endif /* ! C99 */
/* Limits of integral types. */ /* Limits of integral types. */
#ifndef INT8_MIN #ifndef INT8_MIN
@ -96,6 +95,8 @@ typedef unsigned int flex_uint32_t;
#define UINT32_MAX (4294967295U) #define UINT32_MAX (4294967295U)
#endif #endif
#endif /* ! C99 */
#endif /* ! FLEXINT_H */ #endif /* ! FLEXINT_H */
#ifdef __cplusplus #ifdef __cplusplus
@ -138,7 +139,15 @@ typedef void* yyscan_t;
/* Size of default input buffer. */ /* Size of default input buffer. */
#ifndef YY_BUF_SIZE #ifndef YY_BUF_SIZE
#ifdef __ia64__
/* On IA-64, the buffer size is 16k, not 8k.
* Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case.
* Ditto for the __ia64__ case accordingly.
*/
#define YY_BUF_SIZE 32768
#else
#define YY_BUF_SIZE 16384 #define YY_BUF_SIZE 16384
#endif /* __ia64__ */
#endif #endif
#ifndef YY_TYPEDEF_YY_BUFFER_STATE #ifndef YY_TYPEDEF_YY_BUFFER_STATE
@ -146,13 +155,6 @@ typedef void* yyscan_t;
typedef struct yy_buffer_state *YY_BUFFER_STATE; typedef struct yy_buffer_state *YY_BUFFER_STATE;
#endif #endif
/* The following is because we cannot portably get our hands on size_t
* (without autoconf's help, which isn't available because we want
* flex-generated scanners to compile on their own).
* Given that the standard has decreed that size_t exists since 1989,
* I guess we can afford to depend on it. Manoj.
*/
#ifndef YY_TYPEDEF_YY_SIZE_T #ifndef YY_TYPEDEF_YY_SIZE_T
#define YY_TYPEDEF_YY_SIZE_T #define YY_TYPEDEF_YY_SIZE_T
typedef size_t yy_size_t; typedef size_t yy_size_t;
@ -304,7 +306,12 @@ static int yy_flex_strlen (yyconst char * ,yyscan_t yyscanner);
/* Amount of stuff to slurp up with each read. */ /* Amount of stuff to slurp up with each read. */
#ifndef YY_READ_BUF_SIZE #ifndef YY_READ_BUF_SIZE
#ifdef __ia64__
/* On IA-64, the buffer size is 16k, not 8k */
#define YY_READ_BUF_SIZE 16384
#else
#define YY_READ_BUF_SIZE 8192 #define YY_READ_BUF_SIZE 8192
#endif /* __ia64__ */
#endif #endif
/* Number of entries by which start-condition stack grows. */ /* Number of entries by which start-condition stack grows. */

View File

@ -115,6 +115,11 @@ Modify cmDependsFortranLexer.h:
!.*\n { return EOSTMT; } /* Treat comments like */ !.*\n { return EOSTMT; } /* Treat comments like */
<fixed_fmt>^[cC*dD].*\n { return EOSTMT; } /* empty lines */ <fixed_fmt>^[cC*dD].*\n { return EOSTMT; } /* empty lines */
^[ \t]*#[ \t]*include[ \t]*<[^>]+> {
yytext[yyleng-1] = 0;
yylvalp->string = strdup(strchr(yytext, '<')+1);
return CPP_INCLUDE_ANGLE;
}
^[ \t]*#[ \t]*include { return CPP_INCLUDE; } ^[ \t]*#[ \t]*include { return CPP_INCLUDE; }
\$[ \t]*include { return F90PPR_INCLUDE; } \$[ \t]*include { return F90PPR_INCLUDE; }
\?\?[ \t]*include { return COCO_INCLUDE; } \?\?[ \t]*include { return COCO_INCLUDE; }

File diff suppressed because it is too large Load Diff

View File

@ -102,6 +102,7 @@ static bool cmDependsFortranParserIsKeyword(const char* word,
%token <string> CPP_TOENDL %token <string> CPP_TOENDL
%token <number> UNTERMINATED_STRING %token <number> UNTERMINATED_STRING
%token <string> STRING WORD %token <string> STRING WORD
%token <string> CPP_INCLUDE_ANGLE
/*-------------------------------------------------------------------------*/ /*-------------------------------------------------------------------------*/
/* grammar */ /* grammar */
@ -192,6 +193,13 @@ keyword_stmt:
free($1); free($1);
free($2); free($2);
} }
| CPP_INCLUDE_ANGLE other EOSTMT
{
cmDependsFortranParser* parser =
cmDependsFortran_yyget_extra(yyscanner);
cmDependsFortranParser_RuleInclude(parser, $1);
free($1);
}
| include STRING other EOSTMT | include STRING other EOSTMT
{ {
cmDependsFortranParser* parser = cmDependsFortranParser* parser =

View File

@ -1,9 +1,8 @@
/* A Bison parser, made by GNU Bison 2.4.1. */ /* A Bison parser, made by GNU Bison 2.5. */
/* Skeleton interface for Bison's Yacc-like parsers in C /* Bison interface for Yacc-like parsers in C
Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006 Copyright (C) 1984, 1989-1990, 2000-2011 Free Software Foundation, Inc.
Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify 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 it under the terms of the GNU General Public License as published by
@ -31,6 +30,7 @@
This special exception was added by the Free Software Foundation in This special exception was added by the Free Software Foundation in
version 2.2 of Bison. */ version 2.2 of Bison. */
/* Tokens. */ /* Tokens. */
#ifndef YYTOKENTYPE #ifndef YYTOKENTYPE
# define YYTOKENTYPE # define YYTOKENTYPE
@ -64,7 +64,8 @@
CPP_TOENDL = 282, CPP_TOENDL = 282,
UNTERMINATED_STRING = 283, UNTERMINATED_STRING = 283,
STRING = 284, STRING = 284,
WORD = 285 WORD = 285,
CPP_INCLUDE_ANGLE = 286
}; };
#endif #endif
/* Tokens. */ /* Tokens. */
@ -96,6 +97,7 @@
#define UNTERMINATED_STRING 283 #define UNTERMINATED_STRING 283
#define STRING 284 #define STRING 284
#define WORD 285 #define WORD 285
#define CPP_INCLUDE_ANGLE 286
@ -104,12 +106,14 @@
typedef union YYSTYPE typedef union YYSTYPE
{ {
/* Line 1676 of yacc.c */ /* Line 2068 of yacc.c */
#line 94 "cmDependsFortranParser.y" #line 89 "cmDependsFortranParser.y"
char* string; char* string;
/* Line 1676 of yacc.c */
/* Line 2068 of yacc.c */
#line 118 "cmDependsFortranParserTokens.h" #line 118 "cmDependsFortranParserTokens.h"
} YYSTYPE; } YYSTYPE;
# define YYSTYPE_IS_TRIVIAL 1 # define YYSTYPE_IS_TRIVIAL 1