case SEG_DO_REPEAT_COMMAND:
case SEG_INLINE_DATA:
case SEG_DOCUMENT:
+ case SEG_MACRO_BODY:
token->type = T_STRING;
ss_alloc_substring (&token->string, s);
return SCAN_DONE;
ss_alloc_substring (&token->string, s);
return SCAN_DONE;
- case SEG_UNEXPECTED_DOT:
- token->type = SCAN_UNEXPECTED_DOT;
- return SCAN_DONE;
-
case SEG_UNEXPECTED_CHAR:
return scan_unexpected_char (&s, token);
}