-#line 2 "DataDesc/ddt_parse.yy.c"
+#line 2 "gras/DataDesc/ddt_parse.yy.c"
-#line 4 "DataDesc/ddt_parse.yy.c"
+#line 4 "gras/DataDesc/ddt_parse.yy.c"
#define YY_INT_ALIGNED short int
*yy_cp = '\0'; \
(yy_c_buf_p) = yy_cp;
-#define YY_NUM_RULES 30
-#define YY_END_OF_BUFFER 31
+#define YY_NUM_RULES 26
+#define YY_END_OF_BUFFER 27
/* This struct is not used in this scanner,
but its presence is necessary. */
struct yy_trans_info
flex_int32_t yy_verify;
flex_int32_t yy_nxt;
};
-static yyconst flex_int16_t yy_accept[53] =
+static yyconst flex_int16_t yy_accept[61] =
{ 0,
- 20, 20, 4, 4, 0, 0, 0, 0, 31, 29,
- 28, 8, 25, 27, 20, 29, 26, 23, 24, 21,
- 22, 4, 6, 5, 30, 30, 19, 10, 9, 30,
- 20, 2, 1, 4, 5, 5, 7, 3, 19, 18,
- 11, 12, 16, 17, 13, 15, 14, 1, 11, 12,
- 11, 0
+ 14, 14, 7, 7, 10, 10, 0, 0, 27, 25,
+ 24, 19, 20, 21, 23, 14, 25, 22, 17, 18,
+ 15, 16, 7, 7, 6, 7, 7, 10, 12, 11,
+ 26, 26, 14, 0, 1, 7, 7, 7, 5, 7,
+ 10, 11, 11, 13, 0, 0, 2, 1, 4, 0,
+ 3, 0, 2, 0, 3, 0, 0, 8, 9, 0
} ;
static yyconst flex_int32_t yy_ec[256] =
{ 0,
- 1, 1, 1, 1, 1, 1, 1, 1, 1, 2,
+ 1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
- 1, 1, 1, 3, 1, 1, 1, 1, 1, 1,
- 1, 4, 1, 5, 6, 6, 7, 8, 8, 8,
- 8, 8, 8, 8, 8, 9, 9, 1, 10, 1,
- 1, 1, 1, 1, 6, 6, 6, 6, 6, 6,
- 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
- 6, 6, 6, 6, 6, 6, 6, 6, 6, 6,
- 11, 12, 13, 1, 6, 1, 6, 14, 6, 6,
-
- 6, 15, 6, 6, 6, 6, 6, 6, 6, 16,
- 6, 6, 6, 17, 6, 18, 6, 6, 6, 6,
- 6, 6, 19, 1, 20, 1, 1, 1, 1, 1,
+ 1, 2, 1, 1, 1, 1, 1, 1, 1, 4,
+ 5, 6, 1, 7, 8, 8, 9, 10, 10, 10,
+ 10, 10, 10, 10, 10, 10, 10, 1, 11, 1,
+ 1, 1, 1, 1, 8, 8, 8, 8, 8, 8,
+ 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
+ 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
+ 12, 1, 13, 14, 8, 1, 8, 8, 8, 8,
+
+ 8, 8, 15, 8, 8, 8, 8, 8, 8, 8,
+ 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
+ 8, 8, 16, 1, 17, 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
} ;
-static yyconst flex_int32_t yy_meta[21] =
+static yyconst flex_int32_t yy_meta[18] =
{ 0,
- 1, 2, 3, 4, 1, 5, 1, 5, 5, 1,
- 1, 3, 1, 5, 5, 5, 5, 5, 1, 1
+ 1, 1, 2, 1, 1, 3, 1, 4, 1, 4,
+ 1, 1, 1, 1, 4, 1, 1
} ;
-static yyconst flex_int16_t yy_base[62] =
+static yyconst flex_int16_t yy_base[69] =
{ 0,
- 0, 0, 19, 20, 76, 71, 23, 25, 75, 97,
- 97, 97, 97, 97, 0, 25, 97, 97, 97, 97,
- 97, 0, 97, 26, 97, 69, 0, 97, 97, 30,
- 0, 97, 0, 0, 27, 36, 97, 97, 0, 97,
- 33, 41, 97, 97, 97, 97, 97, 0, 43, 45,
- 47, 97, 56, 61, 66, 31, 71, 76, 81, 86,
- 91
+ 0, 0, 16, 30, 17, 18, 78, 77, 85, 88,
+ 88, 88, 88, 88, 88, 0, 19, 88, 88, 88,
+ 88, 88, 0, 24, 88, 75, 77, 0, 88, 21,
+ 88, 76, 0, 22, 0, 0, 27, 75, 0, 71,
+ 0, 29, 34, 88, 29, 65, 76, 0, 0, 63,
+ 74, 60, 72, 56, 65, 51, 50, 88, 88, 88,
+ 45, 49, 53, 55, 57, 61, 65, 69
} ;
-static yyconst flex_int16_t yy_def[62] =
+static yyconst flex_int16_t yy_def[69] =
{ 0,
- 52, 1, 53, 53, 54, 54, 55, 55, 52, 52,
- 52, 52, 52, 52, 56, 52, 52, 52, 52, 52,
- 52, 57, 52, 58, 52, 52, 59, 52, 52, 60,
- 56, 52, 61, 57, 58, 58, 52, 52, 59, 52,
- 52, 52, 52, 52, 52, 52, 52, 61, 52, 52,
- 52, 0, 52, 52, 52, 52, 52, 52, 52, 52,
- 52
+ 60, 1, 61, 61, 62, 62, 63, 63, 60, 60,
+ 60, 60, 60, 60, 60, 64, 60, 60, 60, 60,
+ 60, 60, 65, 65, 60, 65, 65, 66, 60, 67,
+ 60, 60, 64, 60, 68, 65, 65, 65, 65, 65,
+ 66, 67, 67, 60, 60, 60, 60, 68, 65, 60,
+ 60, 60, 60, 60, 60, 60, 60, 60, 60, 0,
+ 60, 60, 60, 60, 60, 60, 60, 60
} ;
-static yyconst flex_int16_t yy_nxt[118] =
+static yyconst flex_int16_t yy_nxt[106] =
{ 0,
- 10, 11, 12, 13, 14, 15, 16, 15, 15, 17,
- 18, 10, 19, 15, 15, 15, 15, 15, 20, 21,
- 23, 23, 24, 24, 28, 29, 28, 29, 32, 36,
- 52, 33, 37, 52, 30, 31, 30, 41, 42, 36,
- 49, 50, 37, 43, 44, 45, 46, 47, 50, 50,
- 51, 50, 50, 50, 50, 50, 22, 22, 22, 22,
- 22, 25, 25, 25, 25, 25, 27, 27, 27, 27,
- 27, 34, 38, 34, 52, 34, 35, 26, 35, 35,
- 35, 39, 26, 52, 39, 39, 40, 40, 40, 40,
- 40, 48, 52, 48, 48, 48, 9, 52, 52, 52,
-
- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52,
- 52, 52, 52, 52, 52, 52, 52
+ 10, 10, 11, 12, 13, 14, 15, 16, 17, 16,
+ 18, 19, 20, 10, 16, 21, 22, 24, 25, 29,
+ 29, 26, 30, 30, 34, 37, 43, 35, 37, 44,
+ 27, 24, 25, 46, 60, 26, 47, 60, 38, 43,
+ 50, 38, 44, 51, 27, 23, 23, 23, 23, 28,
+ 28, 28, 28, 31, 31, 31, 31, 36, 33, 36,
+ 36, 41, 59, 58, 41, 42, 55, 42, 42, 48,
+ 57, 48, 48, 53, 56, 55, 54, 53, 52, 49,
+ 40, 45, 40, 39, 60, 32, 32, 9, 60, 60,
+ 60, 60, 60, 60, 60, 60, 60, 60, 60, 60,
+
+ 60, 60, 60, 60, 60
} ;
-static yyconst flex_int16_t yy_chk[118] =
+static yyconst flex_int16_t yy_chk[106] =
{ 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
- 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
- 3, 4, 3, 4, 7, 7, 8, 8, 16, 24,
- 35, 16, 24, 35, 7, 56, 8, 30, 30, 36,
- 41, 41, 36, 30, 30, 30, 30, 30, 42, 42,
- 49, 49, 50, 50, 51, 51, 53, 53, 53, 53,
- 53, 54, 54, 54, 54, 54, 55, 55, 55, 55,
- 55, 57, 26, 57, 9, 57, 58, 6, 58, 58,
- 58, 59, 5, 0, 59, 59, 60, 60, 60, 60,
- 60, 61, 0, 61, 61, 61, 52, 52, 52, 52,
-
- 52, 52, 52, 52, 52, 52, 52, 52, 52, 52,
- 52, 52, 52, 52, 52, 52, 52
+ 1, 1, 1, 1, 1, 1, 1, 3, 3, 5,
+ 6, 3, 5, 6, 17, 24, 30, 17, 37, 30,
+ 3, 4, 4, 34, 42, 4, 34, 42, 24, 43,
+ 45, 37, 43, 45, 4, 61, 61, 61, 61, 62,
+ 62, 62, 62, 63, 63, 63, 63, 65, 64, 65,
+ 65, 66, 57, 56, 66, 67, 55, 67, 67, 68,
+ 54, 68, 68, 53, 52, 51, 50, 47, 46, 40,
+ 38, 32, 27, 26, 9, 8, 7, 60, 60, 60,
+ 60, 60, 60, 60, 60, 60, 60, 60, 60, 60,
+
+ 60, 60, 60, 60, 60
} ;
static yy_state_type yy_last_accepting_state;
#define YY_MORE_ADJ 0
#define YY_RESTORE_YY_MORE_OFFSET
char *gras_ddt_parse_text;
-#line 1 "DataDesc/ddt_parse.yy.l"
+#line 1 "gras/DataDesc/ddt_parse.yy.l"
/* $Id$ */
/* DataDesc/ddt_parse -- automatic parsing of data structures */
-/* Authors: Arnaud Legrand, Martin Quinson */
-/* Copyright (C) 2003, 2004 Martin Quinson. */
+/* Copyright (c) 2004 Arnaud Legrand, Martin Quinson. All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
- under the terms of the license (GNU LGPL) which comes with this package. */
-#line 13 "DataDesc/ddt_parse.yy.l"
-#include"DataDesc/datadesc_private.h"
-#include"DataDesc/ddt_parse.yy.h"
+ * under the terms of the license (GNU LGPL) which comes with this package. */
+/* char string_buf[GRAS_DDT_PARSE_MAX_STR_CONST];
+ char *string_buf_ptr = NULL; FIXME; killme*/
+#line 15 "gras/DataDesc/ddt_parse.yy.l"
+#include "gras/DataDesc/datadesc_private.h"
+#include "gras/DataDesc/ddt_parse.yy.h"
#include <string.h>
- YY_BUFFER_STATE input_buffer;
- FILE *file_to_parse;
+ YY_BUFFER_STATE gras_ddt_input_buffer;
+ FILE *gras_ddt_file_to_parse;
int gras_ddt_parse_line_pos = 1;
int gras_ddt_parse_col_pos = 0;
int gras_ddt_parse_char_pos = 0;
int gras_ddt_parse_tok_num = 0;
- GRAS_LOG_NEW_DEFAULT_SUBCATEGORY(lexer,parse);
-#define SHOW_WHERE DEBUG4("%d:%d (char #%d): seen %s", gras_ddt_parse_line_pos,gras_ddt_parse_col_pos,gras_ddt_parse_char_pos,gras_ddt_parse_text)
+ const char *definition;
+ XBT_LOG_NEW_DEFAULT_SUBCATEGORY(lexer,ddt_parse,"The crude internals of the lexer used for type parsing");
+#define SHOW_WHERE DEBUG4("%d:%d (char #%d): seen '%s'", gras_ddt_parse_line_pos,gras_ddt_parse_col_pos,gras_ddt_parse_char_pos,gras_ddt_parse_text)
-#line 507 "DataDesc/ddt_parse.yy.c"
+#line 507 "gras/DataDesc/ddt_parse.yy.c"
#define INITIAL 0
-#define comment 1
-#define foo 2
-#define str 3
+#define annotate 1
+#define comment 2
+#define foo 3
#ifndef YY_NO_UNISTD_H
/* Special case for "unistd.h", since it is non-ANSI. We include it way
register char *yy_cp, *yy_bp;
register int yy_act;
-#line 32 "DataDesc/ddt_parse.yy.l"
-
- int comment_caller=0;
+#line 35 "gras/DataDesc/ddt_parse.yy.l"
- char string_buf[GRAS_DDT_PARSE_MAX_STR_CONST];
- char *string_buf_ptr = NULL;
+ int comment_caller=0;
+ int annotate_caller=0;
-#line 668 "DataDesc/ddt_parse.yy.c"
+#line 666 "gras/DataDesc/ddt_parse.yy.c"
if ( (yy_init) )
{
while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
{
yy_current_state = (int) yy_def[yy_current_state];
- if ( yy_current_state >= 53 )
+ if ( yy_current_state >= 61 )
yy_c = yy_meta[(unsigned int) yy_c];
}
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
++yy_cp;
}
- while ( yy_base[yy_current_state] != 97 );
+ while ( yy_base[yy_current_state] != 88 );
yy_find_action:
yy_act = yy_accept[yy_current_state];
case 1:
YY_RULE_SETUP
-#line 38 "DataDesc/ddt_parse.yy.l"
+#line 39 "gras/DataDesc/ddt_parse.yy.l"
YY_BREAK
case 2:
YY_RULE_SETUP
-#line 39 "DataDesc/ddt_parse.yy.l"
-{
- comment_caller = INITIAL;
- BEGIN(comment);
- }
+#line 41 "gras/DataDesc/ddt_parse.yy.l"
+{ /****************** ANNOTATION ************************/
+ DEBUG0("Begin annotation");
+ annotate_caller = INITIAL;
+ gras_ddt_parse_char_pos+= strlen(gras_ddt_parse_text);
+ gras_ddt_parse_col_pos+= strlen(gras_ddt_parse_text);
+ BEGIN(annotate);
+}
YY_BREAK
case 3:
YY_RULE_SETUP
-#line 44 "DataDesc/ddt_parse.yy.l"
-{
- comment_caller = foo;
- BEGIN(comment);
- }
+#line 48 "gras/DataDesc/ddt_parse.yy.l"
+{ /* trim annotation */
+ DEBUG0("Begin annotation");
+ annotate_caller = foo;
+ gras_ddt_parse_char_pos+= strlen(gras_ddt_parse_text);
+ gras_ddt_parse_col_pos+= strlen(gras_ddt_parse_text);
+ BEGIN(annotate);
+}
YY_BREAK
case 4:
YY_RULE_SETUP
-#line 49 "DataDesc/ddt_parse.yy.l"
-/* eat anything that's not a '*' */
+#line 56 "gras/DataDesc/ddt_parse.yy.l"
+{
+ DEBUG0("End annotation");
+ gras_ddt_parse_char_pos+= strlen(gras_ddt_parse_text);
+ gras_ddt_parse_col_pos+= strlen(gras_ddt_parse_text);
+ BEGIN(annotate_caller);
+}
YY_BREAK
case 5:
YY_RULE_SETUP
-#line 50 "DataDesc/ddt_parse.yy.l"
-/* eat up '*'s not followed by '/'s */
+#line 63 "gras/DataDesc/ddt_parse.yy.l"
+{
+ PARSE_ERROR0("``/*g'' construct closed by a regular ``*/''");
+}
YY_BREAK
case 6:
/* rule 6 can match eol */
YY_RULE_SETUP
-#line 51 "DataDesc/ddt_parse.yy.l"
+#line 66 "gras/DataDesc/ddt_parse.yy.l"
{
- ++gras_ddt_parse_line_pos;
- gras_ddt_parse_col_pos=0;
- gras_ddt_parse_char_pos++;
+ PARSE_ERROR0("Type annotation cannot spread over several lines");
}
YY_BREAK
case 7:
YY_RULE_SETUP
-#line 56 "DataDesc/ddt_parse.yy.l"
-BEGIN(comment_caller);
+#line 70 "gras/DataDesc/ddt_parse.yy.l"
+{ /* eat the rest */
+ gras_ddt_parse_char_pos+= strlen(gras_ddt_parse_text);
+ gras_ddt_parse_col_pos+= strlen(gras_ddt_parse_text);
+ return GRAS_DDT_PARSE_TOKEN_ANNOTATE;
+}
YY_BREAK
case 8:
YY_RULE_SETUP
-#line 58 "DataDesc/ddt_parse.yy.l"
-string_buf_ptr = string_buf; gras_ddt_parse_char_pos++;gras_ddt_parse_col_pos++; BEGIN(str);
+#line 76 "gras/DataDesc/ddt_parse.yy.l"
+{ /****************** COMMENTS ************************/
+ /* constructs like : */
+ /*g [string] g*/
+ /* are not comments but size annotations */
+ comment_caller = INITIAL;
+ BEGIN(comment);
+}
YY_BREAK
case 9:
YY_RULE_SETUP
-#line 60 "DataDesc/ddt_parse.yy.l"
-{ /* saw closing quote - all done */
- BEGIN(INITIAL);
- *string_buf_ptr = '\0';
- gras_ddt_parse_text=string_buf;
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
- return GRAS_DDT_PARSE_TOKEN_WORD;
- /* return string constant token type and
- * value to parser
- */
- }
+#line 84 "gras/DataDesc/ddt_parse.yy.l"
+{
+ comment_caller = foo;
+ BEGIN(comment);
+}
YY_BREAK
case 10:
-/* rule 10 can match eol */
YY_RULE_SETUP
-#line 72 "DataDesc/ddt_parse.yy.l"
-{
- /* error - unterminated string constant */
- /* generate error message */
- }
+#line 89 "gras/DataDesc/ddt_parse.yy.l"
+{ /* eat anything that's not a '*' */
+}
YY_BREAK
case 11:
YY_RULE_SETUP
-#line 77 "DataDesc/ddt_parse.yy.l"
-{
- /* octal escape sequence */
- int result;
-
- (void) sscanf( gras_ddt_parse_text + 1, "%o", &result );
-
- if ( result > 0xff )
- /* error, constant is out-of-bounds */
-
- *string_buf_ptr++ = result;
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
- }
+#line 91 "gras/DataDesc/ddt_parse.yy.l"
+{ /* eat up '*'s not followed by '/'s */
+}
YY_BREAK
case 12:
+/* rule 12 can match eol */
YY_RULE_SETUP
-#line 91 "DataDesc/ddt_parse.yy.l"
+#line 93 "gras/DataDesc/ddt_parse.yy.l"
{
- /* generate error - bad escape sequence; something
- * like '\48' or '\0777777'
- */
- }
+ ++gras_ddt_parse_line_pos;
+ gras_ddt_parse_col_pos=0;
+ gras_ddt_parse_char_pos++;
+}
YY_BREAK
case 13:
YY_RULE_SETUP
-#line 97 "DataDesc/ddt_parse.yy.l"
+#line 98 "gras/DataDesc/ddt_parse.yy.l"
{
- *string_buf_ptr++ = '\n';
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
+ gras_ddt_parse_char_pos+= strlen(gras_ddt_parse_text);
+ gras_ddt_parse_col_pos+= strlen(gras_ddt_parse_text);
+ BEGIN(comment_caller);
}
YY_BREAK
case 14:
YY_RULE_SETUP
-#line 102 "DataDesc/ddt_parse.yy.l"
-{
- *string_buf_ptr++ = '\t';
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
+#line 104 "gras/DataDesc/ddt_parse.yy.l"
+{ /****************** STATEMENTS ************************/
+ gras_ddt_parse_char_pos += strlen(gras_ddt_parse_text);
+ gras_ddt_parse_col_pos += strlen(gras_ddt_parse_text);
+ SHOW_WHERE;
+ return(GRAS_DDT_PARSE_TOKEN_WORD);
}
YY_BREAK
case 15:
YY_RULE_SETUP
-#line 107 "DataDesc/ddt_parse.yy.l"
-{
- *string_buf_ptr++ = '\r';
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
+#line 110 "gras/DataDesc/ddt_parse.yy.l"
+{
+ gras_ddt_parse_char_pos++;
+ gras_ddt_parse_col_pos++;
+ SHOW_WHERE;
+ return(GRAS_DDT_PARSE_TOKEN_LA);
}
YY_BREAK
case 16:
YY_RULE_SETUP
-#line 112 "DataDesc/ddt_parse.yy.l"
+#line 116 "gras/DataDesc/ddt_parse.yy.l"
{
- *string_buf_ptr++ = '\b';
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
+ SHOW_WHERE;
+ return(GRAS_DDT_PARSE_TOKEN_RA);
}
YY_BREAK
case 17:
YY_RULE_SETUP
-#line 117 "DataDesc/ddt_parse.yy.l"
-{
- *string_buf_ptr++ = '\f';
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
-}
- YY_BREAK
-case 18:
-/* rule 18 can match eol */
-YY_RULE_SETUP
-#line 123 "DataDesc/ddt_parse.yy.l"
-{
- *string_buf_ptr++ = gras_ddt_parse_text[1];
- if(gras_ddt_parse_text[1]=='\n') {
- ++gras_ddt_parse_line_pos;
- gras_ddt_parse_col_pos=0;
- } else {
- gras_ddt_parse_col_pos++;
- }
- gras_ddt_parse_char_pos++;
-}
- YY_BREAK
-case 19:
-YY_RULE_SETUP
-#line 134 "DataDesc/ddt_parse.yy.l"
-{
- char *yptr = gras_ddt_parse_text;
-
- while ( *yptr )
- *string_buf_ptr++ = *yptr++;
- gras_ddt_parse_char_pos++;
- gras_ddt_parse_col_pos++;
-}
- YY_BREAK
-case 20:
-YY_RULE_SETUP
-#line 143 "DataDesc/ddt_parse.yy.l"
-{
- gras_ddt_parse_char_pos+= strlen(gras_ddt_parse_text);
- gras_ddt_parse_col_pos+= strlen(gras_ddt_parse_text);
- return(GRAS_DDT_PARSE_TOKEN_WORD);
-}
- YY_BREAK
-case 21:
-YY_RULE_SETUP
-#line 148 "DataDesc/ddt_parse.yy.l"
+#line 122 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
SHOW_WHERE;
- return(GRAS_DDT_PARSE_TOKEN_LP);
+ return(GRAS_DDT_PARSE_TOKEN_LB);
}
YY_BREAK
-case 22:
+case 18:
YY_RULE_SETUP
-#line 154 "DataDesc/ddt_parse.yy.l"
+#line 128 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
SHOW_WHERE;
- return(GRAS_DDT_PARSE_TOKEN_RP);
+ return(GRAS_DDT_PARSE_TOKEN_RB);
}
YY_BREAK
-case 23:
+case 19:
YY_RULE_SETUP
-#line 160 "DataDesc/ddt_parse.yy.l"
+#line 134 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
SHOW_WHERE;
- return(GRAS_DDT_PARSE_TOKEN_LB);
+ return(GRAS_DDT_PARSE_TOKEN_LP);
}
YY_BREAK
-case 24:
+case 20:
YY_RULE_SETUP
-#line 166 "DataDesc/ddt_parse.yy.l"
+#line 140 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
SHOW_WHERE;
- return(GRAS_DDT_PARSE_TOKEN_RB);
+ return(GRAS_DDT_PARSE_TOKEN_RP);
}
YY_BREAK
-case 25:
+case 21:
YY_RULE_SETUP
-#line 172 "DataDesc/ddt_parse.yy.l"
+#line 146 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
return(GRAS_DDT_PARSE_TOKEN_STAR);
}
YY_BREAK
-case 26:
+case 22:
YY_RULE_SETUP
-#line 178 "DataDesc/ddt_parse.yy.l"
+#line 152 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
return(GRAS_DDT_PARSE_TOKEN_SEMI_COLON);
}
YY_BREAK
-case 27:
+case 23:
YY_RULE_SETUP
-#line 184 "DataDesc/ddt_parse.yy.l"
+#line 158 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
return(GRAS_DDT_PARSE_TOKEN_COLON);
}
YY_BREAK
-case 28:
-/* rule 28 can match eol */
+case 24:
+/* rule 24 can match eol */
YY_RULE_SETUP
-#line 190 "DataDesc/ddt_parse.yy.l"
+#line 164 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_line_pos++;
gras_ddt_parse_char_pos++;
SHOW_WHERE;
}
YY_BREAK
-case 29:
+case 25:
YY_RULE_SETUP
-#line 196 "DataDesc/ddt_parse.yy.l"
+#line 170 "gras/DataDesc/ddt_parse.yy.l"
{
gras_ddt_parse_char_pos++;
gras_ddt_parse_col_pos++;
SHOW_WHERE;
}
YY_BREAK
-case 30:
+case 26:
YY_RULE_SETUP
-#line 201 "DataDesc/ddt_parse.yy.l"
+#line 175 "gras/DataDesc/ddt_parse.yy.l"
ECHO;
YY_BREAK
-#line 1028 "DataDesc/ddt_parse.yy.c"
+#line 985 "gras/DataDesc/ddt_parse.yy.c"
case YY_STATE_EOF(INITIAL):
+case YY_STATE_EOF(annotate):
case YY_STATE_EOF(comment):
case YY_STATE_EOF(foo):
-case YY_STATE_EOF(str):
yyterminate();
case YY_END_OF_BUFFER:
while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
{
yy_current_state = (int) yy_def[yy_current_state];
- if ( yy_current_state >= 53 )
+ if ( yy_current_state >= 61 )
yy_c = yy_meta[(unsigned int) yy_c];
}
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
{
yy_current_state = (int) yy_def[yy_current_state];
- if ( yy_current_state >= 53 )
+ if ( yy_current_state >= 61 )
yy_c = yy_meta[(unsigned int) yy_c];
}
yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
- yy_is_jam = (yy_current_state == 52);
+ yy_is_jam = (yy_current_state == 60);
return yy_is_jam ? 0 : yy_current_state;
}
#undef YY_DECL_IS_OURS
#undef YY_DECL
#endif
-#line 201 "DataDesc/ddt_parse.yy.l"
+#line 175 "gras/DataDesc/ddt_parse.yy.l"
/* {space}+ { return(TOKEN_SPACE);} */
void gras_ddt_parse_dump(void) {
switch(gras_ddt_parse_tok_num) {
- case GRAS_DDT_PARSE_TOKEN_LP : {printf("TOKEN_LP ");break;}
- case GRAS_DDT_PARSE_TOKEN_RP : {printf("TOKEN_RP ");break;}
+ case GRAS_DDT_PARSE_TOKEN_LA : {printf("TOKEN_LA ");break;}
+ case GRAS_DDT_PARSE_TOKEN_RA : {printf("TOKEN_RA ");break;}
case GRAS_DDT_PARSE_TOKEN_WORD : {printf("TOKEN_WORD ");break;}
- // case GRAS_DDT_PARSE_TOKEN_SPACE : {printf("TOKEN_SPACE ");break;}
- // case GRAS_DDT_PARSE_TOKEN_COMMENT : {printf("TOKEN_COMMENT ");break;}
+ /* case GRAS_DDT_PARSE_TOKEN_SPACE : {printf("TOKEN_SPACE ");break;}*/
+ /* case GRAS_DDT_PARSE_TOKEN_COMMENT : {printf("TOKEN_COMMENT ");break;}*/
case GRAS_DDT_PARSE_TOKEN_NEWLINE : {printf("TOKEN_NEWLINE\n");return;}
case GRAS_DDT_PARSE_TOKEN_EMPTY : {printf("TOKEN_EMPTY\n");return;}
default : {printf("Unknown token %d\n", gras_ddt_parse_tok_num);return;}
int gras_ddt_parse_lex_n_dump(void) {
gras_ddt_parse_tok_num = gras_ddt_parse_lex();
- // gras_ddt_parse_char_pos += strlen(gras_ddt_parse_text);
+ /* gras_ddt_parse_char_pos += strlen(gras_ddt_parse_text);*/
return(gras_ddt_parse_tok_num);
}
void gras_ddt_parse_pointer_init(const char *file) {
- file_to_parse = fopen(file,"r");
- input_buffer = gras_ddt_parse__create_buffer(file_to_parse,10 );
- gras_ddt_parse__switch_to_buffer(input_buffer);
+ gras_ddt_file_to_parse = fopen(file,"r");
+ gras_ddt_input_buffer = gras_ddt_parse__create_buffer(gras_ddt_file_to_parse,10 );
+ gras_ddt_parse__switch_to_buffer(gras_ddt_input_buffer);
gras_ddt_parse_line_pos = 1;
gras_ddt_parse_char_pos = 0;
}
void gras_ddt_parse_pointer_close(void) {
- gras_ddt_parse__delete_buffer(input_buffer);
- fclose(file_to_parse);
+ gras_ddt_parse__delete_buffer(gras_ddt_input_buffer);
+ fclose(gras_ddt_file_to_parse);
gras_ddt_parse_line_pos = 1;
gras_ddt_parse_char_pos = 0;
void gras_ddt_parse_pointer_string_init(const char *string_to_parse) {
- input_buffer = gras_ddt_parse__scan_string (string_to_parse);
- gras_ddt_parse__switch_to_buffer(input_buffer);
+ gras_ddt_input_buffer = gras_ddt_parse__scan_string (string_to_parse);
+ definition = string_to_parse;
+ gras_ddt_parse__switch_to_buffer(gras_ddt_input_buffer);
gras_ddt_parse_line_pos = 1;
gras_ddt_parse_char_pos = 0;
}
void gras_ddt_parse_pointer_string_close(void) {
- gras_ddt_parse__delete_buffer(input_buffer);
+ gras_ddt_parse__delete_buffer(gras_ddt_input_buffer);
gras_ddt_parse_line_pos = 1;
gras_ddt_parse_char_pos = 0;
gras_ddt_parse_tok_num = 0;
+
+ if (0)
+ yyunput('\0',NULL); /* fake a use of this function to calm gcc down */
}
-// Local variables:
-// mode: c
-// End:
+/* Local variables:*/
+/* mode: c */
+/* End: */
