void skip_decl(void) {
int tok;
int done = 0;
int start_line = Scanner_line(scan);
while (!done) {
tok = Scanner_token(scan);
if (tok == 0) {
if (!Swig_error_count()) {
Swig_error(cparse_file, start_line, "Missing semicolon. Reached end of input.\n");
}
return;
}
if (tok == SWIG_TOKEN_LBRACE) {
if (Scanner_skip_balanced(scan,'{','}') < 0) {
Swig_error(cparse_file, start_line, "Missing '}'. Reached end of input.\n");
}
break;
}
if (tok == SWIG_TOKEN_SEMI) {
done = 1;
}
}
cparse_file = Scanner_file(scan);
cparse_line = Scanner_line(scan);
}
static int expr_token(Scanner * s) {
int t;
while (1) {
t = Scanner_token(s);
if (!((t == SWIG_TOKEN_BACKSLASH) || (t == SWIG_TOKEN_ENDLINE) || (t == SWIG_TOKEN_COMMENT)))
break;
}
return t;
}
static PyObject *
scss_Scanner_token(scss_Scanner *self, PyObject *args)
{
PyObject *iter;
PyObject *item;
long size;
Token *p_token;
int token_num;
PyObject *restrictions = NULL;
Pattern *_restrictions = NULL;
int restrictions_sz = 0;
if (self->scanner != NULL) {
if (PyArg_ParseTuple(args, "i|O", &token_num, &restrictions)) {
if (restrictions != NULL) {
size = PySequence_Size(restrictions);
if (size != -1) {
_restrictions = PyMem_New(Pattern, size);
iter = PyObject_GetIter(restrictions);
while ((item = PyIter_Next(iter))) {
if (PyString_Check(item)) {
_restrictions[restrictions_sz].tok = PyString_AsString(item);
_restrictions[restrictions_sz].expr = NULL;
restrictions_sz++;
}
Py_DECREF(item);
}
Py_DECREF(iter);
}
}
p_token = Scanner_token(self->scanner, token_num, _restrictions, restrictions_sz);
if (_restrictions != NULL) PyMem_Del(_restrictions);
if (p_token == (Token *)SCANNER_EXC_BAD_TOKEN) {
PyErr_SetString(PyExc_SyntaxError, self->scanner->exc);
return NULL;
}
if (p_token == (Token *)SCANNER_EXC_RESTRICTED) {
PyErr_SetString(PyExc_SyntaxError, self->scanner->exc);
return NULL;
}
if (p_token == (Token *)SCANNER_EXC_UNIMPLEMENTED) {
PyErr_SetString(PyExc_NotImplementedError, self->scanner->exc);
return NULL;
}
if (p_token == (Token *)SCANNER_EXC_NO_MORE_TOKENS) {
PyErr_SetNone(PyExc_scss_NoMoreTokens);
return NULL;
}
if (p_token < 0) {
PyErr_SetNone(PyExc_Exception);
return NULL;
}
return Py_BuildValue(
"iiss#",
p_token->string - self->scanner->input,
p_token->string - self->scanner->input + p_token->string_sz,
p_token->regex->tok,
p_token->string,
p_token->string_sz
);
}
}
Py_INCREF(Py_None);
return (PyObject *)Py_None;
}
int yylex(void) {
int l;
char *yytext;
if (!scan_init) {
scanner_init();
}
if (next_token) {
l = next_token;
next_token = 0;
return l;
}
l = yylook();
/* Printf(stdout, "%s:%d:::%d: '%s'\n", cparse_file, cparse_line, l, Scanner_text(scan)); */
if (l == NONID) {
last_id = 1;
} else {
last_id = 0;
}
/* We got some sort of non-white space object. We set the start_line
variable unless it has already been set */
if (!cparse_start_line) {
cparse_start_line = cparse_line;
}
/* Copy the lexene */
switch (l) {
case NUM_INT:
case NUM_FLOAT:
case NUM_ULONG:
case NUM_LONG:
case NUM_UNSIGNED:
case NUM_LONGLONG:
case NUM_ULONGLONG:
case NUM_BOOL:
if (l == NUM_INT)
yylval.dtype.type = T_INT;
if (l == NUM_FLOAT)
yylval.dtype.type = T_DOUBLE;
if (l == NUM_ULONG)
yylval.dtype.type = T_ULONG;
if (l == NUM_LONG)
yylval.dtype.type = T_LONG;
if (l == NUM_UNSIGNED)
yylval.dtype.type = T_UINT;
if (l == NUM_LONGLONG)
yylval.dtype.type = T_LONGLONG;
if (l == NUM_ULONGLONG)
yylval.dtype.type = T_ULONGLONG;
if (l == NUM_BOOL)
yylval.dtype.type = T_BOOL;
yylval.dtype.val = NewString(Scanner_text(scan));
yylval.dtype.bitfield = 0;
yylval.dtype.throws = 0;
return (l);
case ID:
yytext = Char(Scanner_text(scan));
if (yytext[0] != '%') {
/* Look for keywords now */
if (strcmp(yytext, "int") == 0) {
yylval.type = NewSwigType(T_INT);
return (TYPE_INT);
}
if (strcmp(yytext, "double") == 0) {
yylval.type = NewSwigType(T_DOUBLE);
return (TYPE_DOUBLE);
}
if (strcmp(yytext, "void") == 0) {
yylval.type = NewSwigType(T_VOID);
return (TYPE_VOID);
}
if (strcmp(yytext, "char") == 0) {
yylval.type = NewSwigType(T_CHAR);
return (TYPE_CHAR);
}
if (strcmp(yytext, "wchar_t") == 0) {
yylval.type = NewSwigType(T_WCHAR);
return (TYPE_WCHAR);
}
if (strcmp(yytext, "short") == 0) {
yylval.type = NewSwigType(T_SHORT);
return (TYPE_SHORT);
}
if (strcmp(yytext, "long") == 0) {
yylval.type = NewSwigType(T_LONG);
return (TYPE_LONG);
}
if (strcmp(yytext, "float") == 0) {
yylval.type = NewSwigType(T_FLOAT);
return (TYPE_FLOAT);
}
if (strcmp(yytext, "signed") == 0) {
yylval.type = NewSwigType(T_INT);
return (TYPE_SIGNED);
}
if (strcmp(yytext, "unsigned") == 0) {
yylval.type = NewSwigType(T_UINT);
return (TYPE_UNSIGNED);
}
if (strcmp(yytext, "bool") == 0) {
yylval.type = NewSwigType(T_BOOL);
return (TYPE_BOOL);
}
/* Non ISO (Windows) C extensions */
if (strcmp(yytext, "__int8") == 0) {
yylval.type = NewString(yytext);
return (TYPE_NON_ISO_INT8);
}
if (strcmp(yytext, "__int16") == 0) {
yylval.type = NewString(yytext);
return (TYPE_NON_ISO_INT16);
}
if (strcmp(yytext, "__int32") == 0) {
yylval.type = NewString(yytext);
return (TYPE_NON_ISO_INT32);
}
if (strcmp(yytext, "__int64") == 0) {
yylval.type = NewString(yytext);
return (TYPE_NON_ISO_INT64);
}
/* C++ keywords */
if (cparse_cplusplus) {
if (strcmp(yytext, "and") == 0)
return (LAND);
if (strcmp(yytext, "or") == 0)
return (LOR);
if (strcmp(yytext, "not") == 0)
return (LNOT);
if (strcmp(yytext, "class") == 0)
return (CLASS);
if (strcmp(yytext, "private") == 0)
return (PRIVATE);
if (strcmp(yytext, "public") == 0)
return (PUBLIC);
if (strcmp(yytext, "protected") == 0)
return (PROTECTED);
if (strcmp(yytext, "friend") == 0)
return (FRIEND);
if (strcmp(yytext, "virtual") == 0)
return (VIRTUAL);
if (strcmp(yytext, "operator") == 0) {
int nexttok;
String *s = NewString("operator ");
/* If we have an operator, we have to collect the operator symbol and attach it to
the operator identifier. To do this, we need to scan ahead by several tokens.
Cases include:
(1) If the next token is an operator as determined by Scanner_isoperator(),
it means that the operator applies to one of the standard C++ mathematical,
assignment, or logical operator symbols (e.g., '+','<=','==','&', etc.)
In this case, we merely append the symbol text to the operator string above.
(2) If the next token is (, we look for ). This is operator ().
(3) If the next token is [, we look for ]. This is operator [].
(4) If the next token is an identifier. The operator is possibly a conversion operator.
(a) Must check for special case new[] and delete[]
Error handling is somewhat tricky here. We'll try to back out gracefully if we can.
*/
nexttok = Scanner_token(scan);
if (Scanner_isoperator(nexttok)) {
/* One of the standard C/C++ symbolic operators */
Append(s,Scanner_text(scan));
yylval.str = s;
return OPERATOR;
} else if (nexttok == SWIG_TOKEN_LPAREN) {
/* Function call operator. The next token MUST be a RPAREN */
nexttok = Scanner_token(scan);
if (nexttok != SWIG_TOKEN_RPAREN) {
Swig_error(Scanner_file(scan),Scanner_line(scan),"Syntax error. Bad operator name.\n");
} else {
Append(s,"()");
yylval.str = s;
return OPERATOR;
}
} else if (nexttok == SWIG_TOKEN_LBRACKET) {
/* Array access operator. The next token MUST be a RBRACKET */
nexttok = Scanner_token(scan);
if (nexttok != SWIG_TOKEN_RBRACKET) {
Swig_error(Scanner_file(scan),Scanner_line(scan),"Syntax error. Bad operator name.\n");
} else {
Append(s,"[]");
yylval.str = s;
return OPERATOR;
}
} else if (nexttok == SWIG_TOKEN_ID) {
/* We have an identifier. This could be any number of things. It could be a named version of
an operator (e.g., 'and_eq') or it could be a conversion operator. To deal with this, we're
going to read tokens until we encounter a ( or ;. Some care is needed for formatting. */
int needspace = 1;
int termtoken = 0;
const char *termvalue = 0;
Append(s,Scanner_text(scan));
while (1) {
nexttok = Scanner_token(scan);
if (nexttok <= 0) {
Swig_error(Scanner_file(scan),Scanner_line(scan),"Syntax error. Bad operator name.\n");
}
if (nexttok == SWIG_TOKEN_LPAREN) {
termtoken = SWIG_TOKEN_LPAREN;
termvalue = "(";
break;
} else if (nexttok == SWIG_TOKEN_CODEBLOCK) {
termtoken = SWIG_TOKEN_CODEBLOCK;
termvalue = Char(Scanner_text(scan));
break;
} else if (nexttok == SWIG_TOKEN_LBRACE) {
termtoken = SWIG_TOKEN_LBRACE;
termvalue = "{";
break;
} else if (nexttok == SWIG_TOKEN_SEMI) {
termtoken = SWIG_TOKEN_SEMI;
termvalue = ";";
break;
} else if (nexttok == SWIG_TOKEN_STRING) {
termtoken = SWIG_TOKEN_STRING;
termvalue = Swig_copy_string(Char(Scanner_text(scan)));
break;
} else if (nexttok == SWIG_TOKEN_ID) {
if (needspace) {
Append(s," ");
}
Append(s,Scanner_text(scan));
} else {
Append(s,Scanner_text(scan));
needspace = 0;
}
}
yylval.str = s;
if (!rename_active) {
String *cs;
char *t = Char(s) + 9;
if (!((strcmp(t, "new") == 0)
|| (strcmp(t, "delete") == 0)
|| (strcmp(t, "new[]") == 0)
|| (strcmp(t, "delete[]") == 0)
|| (strcmp(t, "and") == 0)
|| (strcmp(t, "and_eq") == 0)
|| (strcmp(t, "bitand") == 0)
|| (strcmp(t, "bitor") == 0)
|| (strcmp(t, "compl") == 0)
|| (strcmp(t, "not") == 0)
|| (strcmp(t, "not_eq") == 0)
|| (strcmp(t, "or") == 0)
|| (strcmp(t, "or_eq") == 0)
|| (strcmp(t, "xor") == 0)
|| (strcmp(t, "xor_eq") == 0)
)) {
/* retract(strlen(t)); */
/* The operator is a conversion operator. In order to deal with this, we need to feed the
type information back into the parser. For now this is a hack. Needs to be cleaned up later. */
cs = NewString(t);
if (termtoken) Append(cs,termvalue);
Seek(cs,0,SEEK_SET);
Setline(cs,cparse_line);
Setfile(cs,cparse_file);
Scanner_push(scan,cs);
Delete(cs);
return COPERATOR;
}
}
if (termtoken)
Scanner_pushtoken(scan, termtoken, termvalue);
return (OPERATOR);
}
}
if (strcmp(yytext, "throw") == 0)
return (THROW);
if (strcmp(yytext, "try") == 0)
return (yylex());
if (strcmp(yytext, "catch") == 0)
return (CATCH);
if (strcmp(yytext, "inline") == 0)
return (yylex());
if (strcmp(yytext, "mutable") == 0)
return (yylex());
if (strcmp(yytext, "explicit") == 0)
return (EXPLICIT);
if (strcmp(yytext, "export") == 0)
return (yylex());
if (strcmp(yytext, "typename") == 0)
return (TYPENAME);
if (strcmp(yytext, "template") == 0) {
yylval.ivalue = cparse_line;
return (TEMPLATE);
}
if (strcmp(yytext, "delete") == 0) {
return (DELETE_KW);
}
if (strcmp(yytext, "using") == 0) {
return (USING);
}
if (strcmp(yytext, "namespace") == 0) {
return (NAMESPACE);
}
} else {
if (strcmp(yytext, "class") == 0) {
Swig_warning(WARN_PARSE_CLASS_KEYWORD, cparse_file, cparse_line, "class keyword used, but not in C++ mode.\n");
}
if (strcmp(yytext, "complex") == 0) {
yylval.type = NewSwigType(T_COMPLEX);
return (TYPE_COMPLEX);
}
if (strcmp(yytext, "restrict") == 0)
return (yylex());
}
/* Misc keywords */
if (strcmp(yytext, "extern") == 0)
return (EXTERN);
if (strcmp(yytext, "const") == 0)
return (CONST_QUAL);
if (strcmp(yytext, "static") == 0)
return (STATIC);
if (strcmp(yytext, "struct") == 0)
return (STRUCT);
if (strcmp(yytext, "union") == 0)
return (UNION);
if (strcmp(yytext, "enum") == 0)
return (ENUM);
if (strcmp(yytext, "sizeof") == 0)
return (SIZEOF);
if (strcmp(yytext, "typedef") == 0) {
yylval.ivalue = 0;
return (TYPEDEF);
}
/* Ignored keywords */
if (strcmp(yytext, "volatile") == 0)
return (VOLATILE);
if (strcmp(yytext, "register") == 0)
return (REGISTER);
if (strcmp(yytext, "inline") == 0)
return (yylex());
/* SWIG directives */
} else {
if (strcmp(yytext, "%module") == 0)
return (MODULE);
if (strcmp(yytext, "%insert") == 0)
return (INSERT);
if (strcmp(yytext, "%name") == 0)
return (NAME);
if (strcmp(yytext, "%rename") == 0) {
rename_active = 1;
return (RENAME);
}
if (strcmp(yytext, "%namewarn") == 0) {
rename_active = 1;
return (NAMEWARN);
}
if (strcmp(yytext, "%includefile") == 0)
return (INCLUDE);
if (strcmp(yytext, "%val") == 0) {
Swig_warning(WARN_DEPRECATED_VAL, cparse_file, cparse_line, "%%val directive deprecated (ignored).\n");
return (yylex());
}
if (strcmp(yytext, "%out") == 0) {
Swig_warning(WARN_DEPRECATED_OUT, cparse_file, cparse_line, "%%out directive deprecated (ignored).\n");
return (yylex());
}
if (strcmp(yytext, "%constant") == 0)
return (CONSTANT);
if (strcmp(yytext, "%typedef") == 0) {
yylval.ivalue = 1;
return (TYPEDEF);
}
if (strcmp(yytext, "%native") == 0)
return (NATIVE);
if (strcmp(yytext, "%pragma") == 0)
return (PRAGMA);
if (strcmp(yytext, "%extend") == 0)
return (EXTEND);
if (strcmp(yytext, "%fragment") == 0)
return (FRAGMENT);
if (strcmp(yytext, "%inline") == 0)
return (INLINE);
if (strcmp(yytext, "%typemap") == 0)
return (TYPEMAP);
if (strcmp(yytext, "%feature") == 0) {
/* The rename_active indicates we don't need the information of the
* following function's return type. This applied for %rename, so do
* %feature.
*/
rename_active = 1;
return (FEATURE);
}
if (strcmp(yytext, "%except") == 0)
return (EXCEPT);
if (strcmp(yytext, "%importfile") == 0)
return (IMPORT);
if (strcmp(yytext, "%echo") == 0)
return (ECHO);
if (strcmp(yytext, "%apply") == 0)
return (APPLY);
if (strcmp(yytext, "%clear") == 0)
return (CLEAR);
if (strcmp(yytext, "%types") == 0)
return (TYPES);
if (strcmp(yytext, "%parms") == 0)
return (PARMS);
if (strcmp(yytext, "%varargs") == 0)
return (VARARGS);
if (strcmp(yytext, "%template") == 0) {
return (SWIGTEMPLATE);
}
if (strcmp(yytext, "%warn") == 0)
return (WARN);
}
/* Have an unknown identifier, as a last step, we'll do a typedef lookup on it. */
/* Need to fix this */
if (check_typedef) {
if (SwigType_istypedef(yytext)) {
yylval.type = NewString(yytext);
return (TYPE_TYPEDEF);
}
}
yylval.id = Swig_copy_string(yytext);
last_id = 1;
return (ID);
case POUND:
return yylex();
default:
return (l);
}
}
static int yylook(void) {
int tok = 0;
while (1) {
if ((tok = Scanner_token(scan)) == 0)
return 0;
if (tok == SWIG_TOKEN_ERROR)
return 0;
cparse_start_line = Scanner_start_line(scan);
cparse_line = Scanner_line(scan);
cparse_file = Scanner_file(scan);
switch(tok) {
case SWIG_TOKEN_ID:
return ID;
case SWIG_TOKEN_LPAREN:
return LPAREN;
case SWIG_TOKEN_RPAREN:
return RPAREN;
case SWIG_TOKEN_SEMI:
return SEMI;
case SWIG_TOKEN_COMMA:
return COMMA;
case SWIG_TOKEN_STAR:
return STAR;
case SWIG_TOKEN_RBRACE:
num_brace--;
if (num_brace < 0) {
Swig_error(cparse_file, cparse_line, "Syntax error. Extraneous '}'\n");
num_brace = 0;
} else {
return RBRACE;
}
break;
case SWIG_TOKEN_LBRACE:
last_brace = num_brace;
num_brace++;
return LBRACE;
case SWIG_TOKEN_EQUAL:
return EQUAL;
case SWIG_TOKEN_EQUALTO:
return EQUALTO;
case SWIG_TOKEN_PLUS:
return PLUS;
case SWIG_TOKEN_MINUS:
return MINUS;
case SWIG_TOKEN_SLASH:
return SLASH;
case SWIG_TOKEN_AND:
return AND;
case SWIG_TOKEN_LAND:
return LAND;
case SWIG_TOKEN_OR:
return OR;
case SWIG_TOKEN_LOR:
return LOR;
case SWIG_TOKEN_XOR:
return XOR;
case SWIG_TOKEN_NOT:
return NOT;
case SWIG_TOKEN_LNOT:
return LNOT;
case SWIG_TOKEN_NOTEQUAL:
return NOTEQUALTO;
case SWIG_TOKEN_LBRACKET:
return LBRACKET;
case SWIG_TOKEN_RBRACKET:
return RBRACKET;
case SWIG_TOKEN_QUESTION:
return QUESTIONMARK;
case SWIG_TOKEN_LESSTHAN:
return LESSTHAN;
case SWIG_TOKEN_LTEQUAL:
return LESSTHANOREQUALTO;
case SWIG_TOKEN_LSHIFT:
return LSHIFT;
case SWIG_TOKEN_GREATERTHAN:
return GREATERTHAN;
case SWIG_TOKEN_GTEQUAL:
return GREATERTHANOREQUALTO;
case SWIG_TOKEN_RSHIFT:
return RSHIFT;
case SWIG_TOKEN_PERIOD:
return PERIOD;
case SWIG_TOKEN_MODULO:
return MODULO;
case SWIG_TOKEN_COLON:
return COLON;
case SWIG_TOKEN_DCOLONSTAR:
return DSTAR;
case SWIG_TOKEN_DCOLON:
{
int nexttok = Scanner_token(scan);
if (nexttok == SWIG_TOKEN_STAR) {
return DSTAR;
} else if (nexttok == SWIG_TOKEN_NOT) {
return DCNOT;
} else {
Scanner_pushtoken(scan,nexttok,Scanner_text(scan));
if (!last_id) {
scanner_next_token(DCOLON);
return NONID;
} else {
return DCOLON;
}
}
}
break;
/* Look for multi-character sequences */
case SWIG_TOKEN_RSTRING:
yylval.type = NewString(Scanner_text(scan));
return TYPE_RAW;
case SWIG_TOKEN_STRING:
yylval.id = Swig_copy_string(Char(Scanner_text(scan)));
return STRING;
case SWIG_TOKEN_CHAR:
yylval.str = NewString(Scanner_text(scan));
if (Len(yylval.str) == 0) {
Swig_error(cparse_file, cparse_line, "Empty character constant\n");
Printf(stdout,"%d\n", Len(Scanner_text(scan)));
}
return CHARCONST;
/* Numbers */
case SWIG_TOKEN_INT:
return NUM_INT;
case SWIG_TOKEN_UINT:
return NUM_UNSIGNED;
case SWIG_TOKEN_LONG:
return NUM_LONG;
case SWIG_TOKEN_ULONG:
return NUM_ULONG;
case SWIG_TOKEN_LONGLONG:
return NUM_LONGLONG;
case SWIG_TOKEN_ULONGLONG:
return NUM_ULONGLONG;
case SWIG_TOKEN_DOUBLE:
case SWIG_TOKEN_FLOAT:
return NUM_FLOAT;
case SWIG_TOKEN_BOOL:
return NUM_BOOL;
case SWIG_TOKEN_POUND:
Scanner_skip_line(scan);
yylval.id = Swig_copy_string(Char(Scanner_text(scan)));
return POUND;
break;
case SWIG_TOKEN_CODEBLOCK:
yylval.str = NewString(Scanner_text(scan));
return HBLOCK;
case SWIG_TOKEN_COMMENT:
{
String *cmt = Scanner_text(scan);
char *loc = Char(cmt);
if ((strncmp(loc,"/*@SWIG",7) == 0) && (loc[Len(cmt)-3] == '@')) {
scanner_locator(cmt);
}
}
break;
case SWIG_TOKEN_ENDLINE:
break;
case SWIG_TOKEN_BACKSLASH:
break;
default:
Swig_error(cparse_file, cparse_line, "Illegal token '%s'.\n", Scanner_text(scan));
return (ILLEGAL);
}
}
}
int
Scanner_scan(Scanner *s)
{
unsigned char *cursor = s->cur;
unsigned int depth;
scan:
s->tchar = cursor - s->pos;
s->tline = s->cline;
s->tok = cursor;
#line 224 "scanner.c"
{
YYCTYPE yych;
unsigned int yyaccept;
goto yy29;
++YYCURSOR;
yy29:
if((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
yych = *YYCURSOR;
if(yych <= '/'){
if(yych <= '"'){
if(yych <= '\n'){
if(yych <= '\b') goto yy53;
if(yych <= '\t') goto yy47;
goto yy49;
} else {
if(yych == ' ') goto yy47;
if(yych <= '!') goto yy53;
goto yy37;
}
} else {
if(yych <= '*'){
if(yych <= '&') goto yy53;
if(yych <= '\'') goto yy39;
if(yych <= ')') goto yy43;
goto yy35;
} else {
if(yych <= '+') goto yy44;
if(yych <= '-') goto yy53;
if(yych <= '.') goto yy51;
goto yy33;
}
}
} else {
if(yych <= '@'){
if(yych <= '<'){
if(yych == ';') goto yy43;
goto yy53;
} else {
if(yych <= '=') goto yy43;
if(yych == '?') goto yy44;
goto yy53;
}
} else {
if(yych <= '`'){
if(yych <= 'Z') goto yy45;
if(yych <= '[') goto yy41;
if(yych <= '\\') goto yy43;
goto yy53;
} else {
if(yych <= 'z') goto yy45;
if(yych <= '{') goto yy31;
if(yych <= '|') goto yy43;
goto yy53;
}
}
}
yy31: yyaccept = 0;
yych = *(YYMARKER = ++YYCURSOR);
if(yych <= '/') goto yy32;
if(yych <= '9') goto yy84;
goto yy32;
yy32:
#line 133 "scanner.re"
{ depth = 1;
goto code;
}
#line 291 "scanner.c"
yy33: yych = *++YYCURSOR;
if(yych == '*') goto yy82;
goto yy34;
yy34:
#line 163 "scanner.re"
{ RETURN(*s->tok); }
#line 298 "scanner.c"
yy35: yych = *++YYCURSOR;
if(yych == '/') goto yy80;
goto yy36;
yy36:
#line 165 "scanner.re"
{ yylval.op = *s->tok;
RETURN(CLOSE); }
#line 306 "scanner.c"
yy37: yyaccept = 1;
yych = *(YYMARKER = ++YYCURSOR);
if(yych != '\n') goto yy76;
goto yy38;
yy38:
#line 150 "scanner.re"
{ Scanner_fatal(s, "unterminated string constant (missing \")"); }
#line 314 "scanner.c"
yy39: yyaccept = 2;
yych = *(YYMARKER = ++YYCURSOR);
if(yych != '\n') goto yy71;
goto yy40;
yy40:
#line 151 "scanner.re"
{ Scanner_fatal(s, "unterminated string constant (missing ')"); }
#line 322 "scanner.c"
yy41: yyaccept = 3;
yych = *(YYMARKER = ++YYCURSOR);
if(yych == '\n') goto yy42;
if(yych == '^') goto yy62;
goto yy60;
yy42:
#line 161 "scanner.re"
{ Scanner_fatal(s, "unterminated range (missing ])"); }
#line 331 "scanner.c"
yy43: yych = *++YYCURSOR;
goto yy34;
yy44: yych = *++YYCURSOR;
goto yy36;
yy45: yych = *++YYCURSOR;
goto yy58;
yy46:
#line 180 "scanner.re"
{ SubStr substr;
s->cur = cursor;
substr = Scanner_token(s);
yylval.symbol = Symbol_find(&substr);
return ID; }
#line 345 "scanner.c"
yy47: yych = *++YYCURSOR;
goto yy56;
yy48:
#line 186 "scanner.re"
{ goto scan; }
#line 351 "scanner.c"
yy49: yych = *++YYCURSOR;
goto yy50;
yy50:
#line 188 "scanner.re"
{ if(cursor == s->eof) RETURN(0);
s->pos = cursor; s->cline++;
goto scan;
}
#line 360 "scanner.c"
yy51: yych = *++YYCURSOR;
goto yy52;
yy52:
#line 193 "scanner.re"
{ s->cur = cursor;
yylval.regexp = mkDot();
return RANGE;
}
#line 369 "scanner.c"
yy53: yych = *++YYCURSOR;
goto yy54;
yy54:
#line 198 "scanner.re"
{ fprintf(stderr, "unexpected character: '%c'\n", *s->tok);
goto scan;
}
#line 377 "scanner.c"
yy55: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy56;
yy56: if(yych == '\t') goto yy55;
if(yych == ' ') goto yy55;
goto yy48;
yy57: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy58;
yy58: if(yych <= '@'){
if(yych <= '/') goto yy46;
if(yych <= '9') goto yy57;
goto yy46;
} else {
if(yych <= 'Z') goto yy57;
if(yych <= '`') goto yy46;
if(yych <= 'z') goto yy57;
goto yy46;
}
yy59: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy60;
yy60: if(yych <= '['){
if(yych != '\n') goto yy59;
goto yy61;
} else {
if(yych <= '\\') goto yy64;
if(yych <= ']') goto yy65;
goto yy59;
}
yy61: YYCURSOR = YYMARKER;
switch(yyaccept){
case 0: goto yy32;
case 1: goto yy38;
case 2: goto yy40;
case 3: goto yy42;
}
yy62: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy63;
yy63: if(yych <= '['){
if(yych == '\n') goto yy61;
goto yy62;
} else {
if(yych <= '\\') goto yy67;
if(yych <= ']') goto yy68;
goto yy62;
}
yy64: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
if(yych == '\n') goto yy61;
goto yy59;
yy65: yych = *++YYCURSOR;
goto yy66;
yy66:
#line 157 "scanner.re"
{ s->cur = cursor;
yylval.regexp = ranToRE(Scanner_token(s));
return RANGE; }
#line 442 "scanner.c"
yy67: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
if(yych == '\n') goto yy61;
goto yy62;
yy68: yych = *++YYCURSOR;
goto yy69;
yy69:
#line 153 "scanner.re"
{ s->cur = cursor;
yylval.regexp = invToRE(Scanner_token(s));
return RANGE; }
#line 455 "scanner.c"
yy70: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy71;
yy71: if(yych <= '&'){
if(yych == '\n') goto yy61;
goto yy70;
} else {
if(yych <= '\'') goto yy73;
if(yych != '\\') goto yy70;
goto yy72;
}
yy72: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
if(yych == '\n') goto yy61;
goto yy70;
yy73: yych = *++YYCURSOR;
goto yy74;
yy74:
#line 146 "scanner.re"
{ s->cur = cursor;
yylval.regexp = strToCaseInsensitiveRE(Scanner_token(s));
return STRING; }
#line 480 "scanner.c"
yy75: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy76;
yy76: if(yych <= '!'){
if(yych == '\n') goto yy61;
goto yy75;
} else {
if(yych <= '"') goto yy78;
if(yych != '\\') goto yy75;
goto yy77;
}
yy77: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
if(yych == '\n') goto yy61;
goto yy75;
yy78: yych = *++YYCURSOR;
goto yy79;
yy79:
#line 142 "scanner.re"
{ s->cur = cursor;
yylval.regexp = strToRE(Scanner_token(s));
return STRING; }
#line 505 "scanner.c"
yy80: yych = *++YYCURSOR;
goto yy81;
yy81:
#line 139 "scanner.re"
{ s->tok = cursor;
RETURN(0); }
#line 512 "scanner.c"
yy82: yych = *++YYCURSOR;
goto yy83;
yy83:
#line 136 "scanner.re"
{ depth = 1;
goto comment; }
#line 519 "scanner.c"
yy84: ++YYCURSOR;
if((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
yych = *YYCURSOR;
goto yy85;
yy85: if(yych <= '/'){
if(yych == ',') goto yy88;
goto yy61;
} else {
if(yych <= '9') goto yy84;
if(yych != '}') goto yy61;
goto yy86;
}
yy86: yych = *++YYCURSOR;
goto yy87;
yy87:
#line 168 "scanner.re"
{ yylval.extop.minsize = atoi((char *)s->tok+1);
yylval.extop.maxsize = atoi((char *)s->tok+1);
RETURN(CLOSESIZE); }
#line 539 "scanner.c"
yy88: yych = *++YYCURSOR;
if(yych != '}') goto yy92;
goto yy89;
yy89: yych = *++YYCURSOR;
goto yy90;
yy90:
#line 176 "scanner.re"
{ yylval.extop.minsize = atoi((char *)s->tok+1);
yylval.extop.maxsize = -1;
RETURN(CLOSESIZE); }
#line 550 "scanner.c"
yy91: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy92;
yy92: if(yych <= '/') goto yy61;
if(yych <= '9') goto yy91;
if(yych != '}') goto yy61;
goto yy93;
yy93: yych = *++YYCURSOR;
goto yy94;
yy94:
#line 172 "scanner.re"
{ yylval.extop.minsize = atoi((char *)s->tok+1);
yylval.extop.maxsize = MAX(yylval.extop.minsize,atoi(strchr((char *)s->tok, ',')+1));
RETURN(CLOSESIZE); }
#line 566 "scanner.c"
}
#line 201 "scanner.re"
code:
#line 573 "scanner.c"
{
YYCTYPE yych;
unsigned int yyaccept;
goto yy95;
++YYCURSOR;
yy95:
if((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
yych = *YYCURSOR;
if(yych <= '&'){
if(yych <= '\n'){
if(yych <= '\t') goto yy103;
goto yy101;
} else {
if(yych == '"') goto yy105;
goto yy103;
}
} else {
if(yych <= '{'){
if(yych <= '\'') goto yy106;
if(yych <= 'z') goto yy103;
goto yy99;
} else {
if(yych != '}') goto yy103;
goto yy97;
}
}
yy97: yych = *++YYCURSOR;
goto yy98;
yy98:
#line 205 "scanner.re"
{ if(--depth == 0){
s->cur = cursor;
yylval.token = Token_new(Scanner_token(s), s->tline);
return CODE;
}
goto code; }
#line 610 "scanner.c"
yy99: yych = *++YYCURSOR;
goto yy100;
yy100:
#line 211 "scanner.re"
{ ++depth;
goto code; }
#line 617 "scanner.c"
yy101: yych = *++YYCURSOR;
goto yy102;
yy102:
#line 213 "scanner.re"
{ if(cursor == s->eof) Scanner_fatal(s, "missing '}'");
s->pos = cursor; s->cline++;
goto code;
}
#line 626 "scanner.c"
yy103: yych = *++YYCURSOR;
goto yy104;
yy104:
#line 217 "scanner.re"
{ goto code; }
#line 632 "scanner.c"
yy105: yyaccept = 0;
yych = *(YYMARKER = ++YYCURSOR);
if(yych == '\n') goto yy104;
goto yy112;
yy106: yyaccept = 0;
yych = *(YYMARKER = ++YYCURSOR);
if(yych == '\n') goto yy104;
goto yy108;
yy107: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy108;
yy108: if(yych <= '&'){
if(yych != '\n') goto yy107;
goto yy109;
} else {
if(yych <= '\'') goto yy103;
if(yych == '\\') goto yy110;
goto yy107;
}
yy109: YYCURSOR = YYMARKER;
switch(yyaccept){
case 0: goto yy104;
}
yy110: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
if(yych == '\n') goto yy109;
goto yy107;
yy111: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
goto yy112;
yy112: if(yych <= '!'){
if(yych == '\n') goto yy109;
goto yy111;
} else {
if(yych <= '"') goto yy103;
if(yych != '\\') goto yy111;
goto yy113;
}
yy113: ++YYCURSOR;
if(YYLIMIT == YYCURSOR) YYFILL(1);
yych = *YYCURSOR;
if(yych == '\n') goto yy109;
goto yy111;
}
#line 218 "scanner.re"
comment:
#line 685 "scanner.c"
{
YYCTYPE yych;
goto yy114;
++YYCURSOR;
yy114:
if((YYLIMIT - YYCURSOR) < 2) YYFILL(2);
yych = *YYCURSOR;
if(yych <= ')'){
if(yych == '\n') goto yy119;
goto yy121;
} else {
if(yych <= '*') goto yy116;
if(yych == '/') goto yy118;
goto yy121;
}
yy116: yych = *++YYCURSOR;
if(yych == '/') goto yy124;
goto yy117;
yy117:
#line 232 "scanner.re"
{ goto comment; }
#line 707 "scanner.c"
yy118: yych = *++YYCURSOR;
if(yych == '*') goto yy122;
goto yy117;
yy119: yych = *++YYCURSOR;
goto yy120;
yy120:
#line 228 "scanner.re"
{ if(cursor == s->eof) RETURN(0);
s->tok = s->pos = cursor; s->cline++;
goto comment;
}
#line 719 "scanner.c"
yy121: yych = *++YYCURSOR;
goto yy117;
yy122: yych = *++YYCURSOR;
goto yy123;
yy123:
#line 226 "scanner.re"
{ ++depth;
goto comment; }
#line 728 "scanner.c"
yy124: yych = *++YYCURSOR;
goto yy125;
yy125:
#line 222 "scanner.re"
{ if(--depth == 0)
goto scan;
else
goto comment; }
#line 737 "scanner.c"
}
#line 233 "scanner.re"
}
static int yylook(void) {
int tok = 0;
while (1) {
if ((tok = Scanner_token(scan)) == 0)
return 0;
if (tok == SWIG_TOKEN_ERROR)
return 0;
cparse_start_line = Scanner_start_line(scan);
cparse_line = Scanner_line(scan);
cparse_file = Scanner_file(scan);
switch(tok) {
case SWIG_TOKEN_ID:
return ID;
case SWIG_TOKEN_LPAREN:
return LPAREN;
case SWIG_TOKEN_RPAREN:
return RPAREN;
case SWIG_TOKEN_SEMI:
return SEMI;
case SWIG_TOKEN_COMMA:
return COMMA;
case SWIG_TOKEN_STAR:
return STAR;
case SWIG_TOKEN_RBRACE:
num_brace--;
if (num_brace < 0) {
Swig_error(cparse_file, cparse_line, "Syntax error. Extraneous '}'\n");
num_brace = 0;
} else {
return RBRACE;
}
break;
case SWIG_TOKEN_LBRACE:
last_brace = num_brace;
num_brace++;
return LBRACE;
case SWIG_TOKEN_EQUAL:
return EQUAL;
case SWIG_TOKEN_EQUALTO:
return EQUALTO;
case SWIG_TOKEN_PLUS:
return PLUS;
case SWIG_TOKEN_MINUS:
return MINUS;
case SWIG_TOKEN_SLASH:
return SLASH;
case SWIG_TOKEN_AND:
return AND;
case SWIG_TOKEN_LAND:
return LAND;
case SWIG_TOKEN_OR:
return OR;
case SWIG_TOKEN_LOR:
return LOR;
case SWIG_TOKEN_XOR:
return XOR;
case SWIG_TOKEN_NOT:
return NOT;
case SWIG_TOKEN_LNOT:
return LNOT;
case SWIG_TOKEN_NOTEQUAL:
return NOTEQUALTO;
case SWIG_TOKEN_LBRACKET:
return LBRACKET;
case SWIG_TOKEN_RBRACKET:
return RBRACKET;
case SWIG_TOKEN_QUESTION:
return QUESTIONMARK;
case SWIG_TOKEN_LESSTHAN:
return LESSTHAN;
case SWIG_TOKEN_LTEQUAL:
return LESSTHANOREQUALTO;
case SWIG_TOKEN_LSHIFT:
return LSHIFT;
case SWIG_TOKEN_GREATERTHAN:
return GREATERTHAN;
case SWIG_TOKEN_GTEQUAL:
return GREATERTHANOREQUALTO;
case SWIG_TOKEN_RSHIFT:
return RSHIFT;
case SWIG_TOKEN_PERIOD:
return PERIOD;
case SWIG_TOKEN_MODULO:
return MODULO;
case SWIG_TOKEN_COLON:
return COLON;
case SWIG_TOKEN_DCOLONSTAR:
return DSTAR;
case SWIG_TOKEN_DCOLON:
{
int nexttok = Scanner_token(scan);
if (nexttok == SWIG_TOKEN_STAR) {
return DSTAR;
} else if (nexttok == SWIG_TOKEN_NOT) {
return DCNOT;
} else {
Scanner_pushtoken(scan,nexttok,Scanner_text(scan));
if (!last_id) {
scanner_next_token(DCOLON);
return NONID;
} else {
return DCOLON;
}
}
}
break;
/* Look for multi-character sequences */
case SWIG_TOKEN_RSTRING:
yylval.type = NewString(Scanner_text(scan));
return TYPE_RAW;
case SWIG_TOKEN_STRING:
yylval.id = Swig_copy_string(Char(Scanner_text(scan)));
return STRING;
case SWIG_TOKEN_CHAR:
yylval.str = NewString(Scanner_text(scan));
if (Len(yylval.str) == 0) {
Swig_error(cparse_file, cparse_line, "Empty character constant\n");
Printf(stdout,"%d\n", Len(Scanner_text(scan)));
}
return CHARCONST;
/* Numbers */
case SWIG_TOKEN_INT:
return NUM_INT;
case SWIG_TOKEN_UINT:
return NUM_UNSIGNED;
case SWIG_TOKEN_LONG:
return NUM_LONG;
case SWIG_TOKEN_ULONG:
return NUM_ULONG;
case SWIG_TOKEN_LONGLONG:
return NUM_LONGLONG;
case SWIG_TOKEN_ULONGLONG:
return NUM_ULONGLONG;
case SWIG_TOKEN_DOUBLE:
case SWIG_TOKEN_FLOAT:
return NUM_FLOAT;
case SWIG_TOKEN_BOOL:
return NUM_BOOL;
case SWIG_TOKEN_POUND:
Scanner_skip_line(scan);
yylval.id = Swig_copy_string(Char(Scanner_text(scan)));
return POUND;
break;
case SWIG_TOKEN_CODEBLOCK:
yylval.str = NewString(Scanner_text(scan));
return HBLOCK;
case SWIG_TOKEN_COMMENT:
{
String *cmt = Scanner_text(scan);
char *loc = Char(cmt);
if ((strncmp(loc,"/*@SWIG",7) == 0) && (loc[Len(cmt)-3] == '@')) {
Scanner_locator(scan, cmt);
}
if (scan_doxygen_comments) { /* else just skip this node, to avoid crashes in parser module*/
if (strncmp(loc, "/**<", 4) == 0 || strncmp(loc, "///<", 4) == 0||strncmp(loc, "/*!<", 4) == 0||strncmp(loc, "//!<", 4) == 0) {
/* printf("Doxygen Post Comment: %s lines %d-%d [%s]\n", Char(Scanner_file(scan)), Scanner_start_line(scan), Scanner_line(scan), loc); */
yylval.str = NewString(loc);
Setline(yylval.str, Scanner_start_line(scan));
Setfile(yylval.str, Scanner_file(scan));
return DOXYGENPOSTSTRING;
}
if (strncmp(loc, "/**", 3) == 0 || strncmp(loc, "///", 3) == 0||strncmp(loc, "/*!", 3) == 0||strncmp(loc, "//!", 3) == 0) {
/* printf("Doxygen Comment: %s lines %d-%d [%s]\n", Char(Scanner_file(scan)), Scanner_start_line(scan), Scanner_line(scan), loc); */
/* ignore comments like / * * * and / * * /, which are also ignored by Doxygen */
if (loc[3] != '*' && loc[3] != '/') {
yylval.str = NewString(loc);
Setline(yylval.str, Scanner_start_line(scan));
Setfile(yylval.str, Scanner_file(scan));
return DOXYGENSTRING;
}
}
}
}
break;
case SWIG_TOKEN_ENDLINE:
break;
case SWIG_TOKEN_BACKSLASH:
break;
default:
Swig_error(cparse_file, cparse_line, "Illegal token '%s'.\n", Scanner_text(scan));
return (ILLEGAL);
}
}
}
