-<comment>"*"+"/" BEGIN(comment_caller);
-
-\" string_buf_ptr = string_buf; gras_ddt_parse_char_pos++;gras_ddt_parse_col_pos++; BEGIN(str);
-
-<str>\" { /* saw closing quote - all done */
- BEGIN(INITIAL);
- *string_buf_ptr = '\0';
- yytext=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
- */
- }
-
-<str>\n {
- /* error - unterminated string constant */
- /* generate error message */
- }
-
-<str>\\[0-7]{1,3} {
- /* octal escape sequence */
- int result;
-
- (void) sscanf( yytext + 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++;
- }
-
-<str>\\[0-9]+ {
- /* generate error - bad escape sequence; something
- * like '\48' or '\0777777'
- */
- }