static int CPPerror(yystypepp * yylvalpp) { int token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); const char *message; while (token != '\n') { if (token == CPP_FLOATCONSTANT || token == CPP_INTCONSTANT) { StoreStr(yylvalpp->symbol_name); } else if (token == CPP_IDENTIFIER || token == CPP_STRCONSTANT) { StoreStr(GetStringOfAtom(atable, yylvalpp->sc_ident)); } else { StoreStr(GetStringOfAtom(atable, token)); } token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); } DecLineNumber(); /*store this msg into the shader's information log..set the Compile Error flag!!!! */ message = GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); cpp->CompileError = 1; IncLineNumber(); return '\n'; } /*CPPerror */
static int CPPerror(yystypepp * yylvalpp) { int token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); const char *message; while (token != '\n') { if (token <= 0){ CPPErrorToInfoLog("unexpected end of input in #error preprocessor directive - expected a newline"); return 0; }else if (token == CPP_FLOATCONSTANT || token == CPP_INTCONSTANT){ StoreStr(yylvalpp->symbol_name); }else if(token == CPP_IDENTIFIER || token == CPP_STRCONSTANT){ StoreStr(GetStringOfAtom(atable,yylvalpp->sc_ident)); }else { StoreStr(GetStringOfAtom(atable,token)); } token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); } DecLineNumber(); //store this msg into the shader's information log..set the Compile Error flag!!!! message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); cpp->CompileError=1; IncLineNumber(); return '\n'; }//CPPerror
int yylex_CPP(char* buf, int maxSize) { yystypepp yylvalpp; int token = '\n'; for(;;) { char* tokenString = 0; token = cpp->currentInput->scan(cpp->currentInput, &yylvalpp); if(check_EOF(token)) return 0; if (token == '#') { if (cpp->previous_token == '\n'|| cpp->previous_token == 0) { token = readCPPline(&yylvalpp); if(check_EOF(token)) return 0; continue; } else { CPPErrorToInfoLog("preprocessor command must not be preceded by any other statement in that line"); return 0; } } cpp->previous_token = token; // expand macros if (token == CPP_IDENTIFIER && MacroExpand(yylvalpp.sc_ident, &yylvalpp)) { cpp->pastFirstStatement = 1; continue; } if (token == '\n') continue; cpp->pastFirstStatement = 1; if (token == CPP_IDENTIFIER) { tokenString = GetStringOfAtom(atable,yylvalpp.sc_ident); } else if (token == CPP_FLOATCONSTANT || token == CPP_INTCONSTANT){ tokenString = yylvalpp.symbol_name; } else { tokenString = GetStringOfAtom(atable,token); } if (tokenString) { int len = strlen(tokenString); cpp->tokensBeforeEOF = 1; if (len >= maxSize) { return maxSize; } else if (len > 0) { strcpy(buf, tokenString); return len; } return 0; } } return 0; } // yylex
// Handle #error int TPpContext::CPPerror(TPpToken * yylvalpp) { int token = currentInput->scan(this, currentInput, yylvalpp); std::string message; TSourceLoc loc = yylvalpp->loc; while (token != '\n') { if (token == CPP_INTCONSTANT || token == CPP_UINTCONSTANT || token == CPP_FLOATCONSTANT || token == CPP_DOUBLECONSTANT) { message.append(yylvalpp->name); } else if (token == CPP_IDENTIFIER || token == CPP_STRCONSTANT) { message.append(GetStringOfAtom(&atomTable, yylvalpp->atom)); } else { message.append(GetStringOfAtom(&atomTable, token)); } message.append(" "); token = currentInput->scan(this, currentInput, yylvalpp); } //store this msg into the shader's information log..set the Compile Error flag!!!! parseContext.error(loc, message.c_str(), "#error", ""); return '\n'; }
int MacroExpand(int atom, yystypepp * yylvalpp) { Symbol *sym = LookUpSymbol(macros, atom); MacroInputSrc *in; int i,j, token, depth=0; const char *message; if (atom == __LINE__Atom) { yylvalpp->sc_int = GetLineNumber(); snprintf(yylvalpp->symbol_name, MAX_SYMBOL_NAME_LEN+1, "%d", yylvalpp->sc_int); UngetToken(CPP_INTCONSTANT, yylvalpp); return 1; } if (atom == __FILE__Atom) { yylvalpp->sc_int = GetStringNumber(); snprintf(yylvalpp->symbol_name, MAX_SYMBOL_NAME_LEN+1, "%d", yylvalpp->sc_int); UngetToken(CPP_INTCONSTANT, yylvalpp); return 1; } if (atom == __VERSION__Atom) { strcpy(yylvalpp->symbol_name,ESSL_VERSION_STRING); yylvalpp->sc_int = atoi(yylvalpp->symbol_name); UngetToken(CPP_INTCONSTANT, yylvalpp); return 1; } if (!sym || sym->details.mac.undef) return 0; if (sym->details.mac.busy) return 0; // no recursive expansions in = malloc(sizeof(*in)); memset(in, 0, sizeof(*in)); in->base.scan = (void *)macro_scan; in->base.line = cpp->currentInput->line; in->base.name = cpp->currentInput->name; in->mac = &sym->details.mac; if (sym->details.mac.args) { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token != '(') { UngetToken(token, yylvalpp); yylvalpp->sc_ident = atom; return 0; } in->args = malloc(in->mac->argc * sizeof(TokenStream *)); for (i=0; i<in->mac->argc; i++) in->args[i] = NewTokenStream("macro arg", 0); i=0;j=0; do{ depth = 0; while(1) { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token <= 0) { StoreStr("EOF in Macro "); StoreStr(GetStringOfAtom(atable,atom)); message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); return 1; } if((in->mac->argc==0) && (token!=')')) break; if (depth == 0 && (token == ',' || token == ')')) break; if (token == '(') depth++; if (token == ')') depth--; RecordToken(in->args[i], token, yylvalpp); j=1; } if (token == ')') { if((in->mac->argc==1) &&j==0) break; i++; break; } i++; }while(i < in->mac->argc); if (i < in->mac->argc) { StoreStr("Too few args in Macro "); StoreStr(GetStringOfAtom(atable,atom)); message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); } else if (token != ')') { depth=0; while (token >= 0 && (depth > 0 || token != ')')) { if (token == ')') depth--; token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token == '(') depth++; } if (token <= 0) { StoreStr("EOF in Macro "); StoreStr(GetStringOfAtom(atable,atom)); message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); return 1; } StoreStr("Too many args in Macro "); StoreStr(GetStringOfAtom(atable,atom)); message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); } for (i=0; i<in->mac->argc; i++) { in->args[i] = PrescanMacroArg(in->args[i], yylvalpp); } } #if 0 printf(" <%s:%d>found macro %s\n", GetAtomString(atable, loc.file), loc.line, GetAtomString(atable, atom)); for (i=0; i<in->mac->argc; i++) { printf("\targ %s = '", GetAtomString(atable, in->mac->args[i])); DumpTokenStream(stdout, in->args[i]); printf("'\n"); } #endif /*retain the input source*/ in->base.prev = cpp->currentInput; sym->details.mac.busy = 1; RewindTokenStream(sym->details.mac.body); cpp->currentInput = &in->base; return 1; } // MacroExpand
int readCPPline(yystypepp * yylvalpp) { int token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); const char *message; if (token == CPP_IDENTIFIER) { if (yylvalpp->sc_ident == defineAtom) { token = CPPdefine(yylvalpp); } else if (yylvalpp->sc_ident == elseAtom) { if(ChkCorrectElseNesting()){ if (!cpp->ifdepth ){ CPPErrorToInfoLog("#else mismatch"); cpp->CompileError=1; return 0; } token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token != '\n') { CPPWarningToInfoLog("unexpected tokens following #else preprocessor directive - expected a newline"); while (token != '\n') { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token <= 0) { // EOF or error CPPErrorToInfoLog("unexpected end of input in #ifdef preprocessor directive - expected a newline"); return 0; } } } token = CPPelse(0, yylvalpp); }else{ CPPErrorToInfoLog("#else after a #else"); cpp->ifdepth = 0; cpp->elsetracker = 0; cpp->pastFirstStatement = 1; cpp->CompileError = 1; return 0; } } else if (yylvalpp->sc_ident == elifAtom) { if (!cpp->ifdepth){ CPPErrorToInfoLog("#elif mismatch"); cpp->CompileError=1; return 0; } // this token is really a dont care, but we still need to eat the tokens token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); while (token != '\n') { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token <= 0) { // EOF or error CPPErrorToInfoLog("unexpect tokens following #elif preprocessor directive - expected a newline"); cpp->CompileError = 1; return 0; } } token = CPPelse(0, yylvalpp); } else if (yylvalpp->sc_ident == endifAtom) { if (!cpp->ifdepth){ CPPErrorToInfoLog("#endif mismatch"); cpp->CompileError=1; return 0; } else --cpp->ifdepth; if (cpp->elsetracker) --cpp->elsetracker; } else if (yylvalpp->sc_ident == ifAtom) { token = CPPif(yylvalpp); } else if (yylvalpp->sc_ident == ifdefAtom) { token = CPPifdef(1, yylvalpp); } else if (yylvalpp->sc_ident == ifndefAtom) { token = CPPifdef(0, yylvalpp); } else if (yylvalpp->sc_ident == lineAtom) { token = CPPline(yylvalpp); } else if (yylvalpp->sc_ident == pragmaAtom) { token = CPPpragma(yylvalpp); } else if (yylvalpp->sc_ident == undefAtom) { token = CPPundef(yylvalpp); } else if (yylvalpp->sc_ident == errorAtom) { token = CPPerror(yylvalpp); } else if (yylvalpp->sc_ident == versionAtom) { token = CPPversion(yylvalpp); } else if (yylvalpp->sc_ident == extensionAtom) { token = CPPextension(yylvalpp); } else { StoreStr("Invalid Directive"); StoreStr(GetStringOfAtom(atable,yylvalpp->sc_ident)); message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); } } while (token != '\n' && token != 0 && token != EOF) { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); } cpp->pastFirstStatement = 1; return token; } // readCPPline
static int CPPdefine(yystypepp * yylvalpp) { int token, name, args[MAX_MACRO_ARGS], argc; const char *message; MacroSymbol mac; Symbol *symb; SourceLoc dummyLoc; memset(&mac, 0, sizeof(mac)); token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token != CPP_IDENTIFIER) { CPPErrorToInfoLog("#define"); return token; } name = yylvalpp->sc_ident; token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token == '(' && !yylvalpp->sc_int) { // gather arguments argc = 0; do { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (argc == 0 && token == ')') break; if (token != CPP_IDENTIFIER) { CPPErrorToInfoLog("#define"); return token; } if (argc < MAX_MACRO_ARGS) args[argc++] = yylvalpp->sc_ident; token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); } while (token == ','); if (token != ')') { CPPErrorToInfoLog("#define"); return token; } mac.argc = argc; mac.args = mem_Alloc(macros->pool, argc * sizeof(int)); memcpy(mac.args, args, argc * sizeof(int)); token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); } mac.body = NewTokenStream(GetAtomString(atable, name), macros->pool); while (token != '\n') { if (token == '\\') { CPPErrorToInfoLog("The line continuation character (\\) is not part of the OpenGL ES Shading Language"); return token; } else if (token <= 0) { // EOF or error CPPErrorToInfoLog("unexpected end of input in #define preprocessor directive - expected a newline"); return 0; } RecordToken(mac.body, token, yylvalpp); token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); }; symb = LookUpSymbol(macros, name); if (symb) { if (!symb->details.mac.undef) { // already defined -- need to make sure they are identical if (symb->details.mac.argc != mac.argc) goto error; for (argc=0; argc < mac.argc; argc++) if (symb->details.mac.args[argc] != mac.args[argc]) goto error; RewindTokenStream(symb->details.mac.body); RewindTokenStream(mac.body); do { int old_lval, old_token; old_token = ReadToken(symb->details.mac.body, yylvalpp); old_lval = yylvalpp->sc_int; token = ReadToken(mac.body, yylvalpp); if (token != old_token || yylvalpp->sc_int != old_lval) { error: StoreStr("Macro Redefined"); StoreStr(GetStringOfAtom(atable,name)); message=GetStrfromTStr(); DecLineNumber(); CPPShInfoLogMsg(message); IncLineNumber(); ResetTString(); break; } } while (token > 0); } //FreeMacro(&symb->details.mac); } else { dummyLoc.file = 0; dummyLoc.line = 0; symb = AddSymbol(&dummyLoc, macros, name, MACRO_S); } symb->details.mac = mac; return '\n'; } // CPPdefine
/* MacroExpand ** Check an identifier (atom) to see if it is a macro that should be expanded. ** If it is, push an InputSrc that will produce the appropriate expansion ** and return 1. ** If it is, but undefined, it should expand to 0, push an InputSrc that will ** expand to 0 and return -1. ** Otherwise, return 0. */ int TPpContext::MacroExpand(int atom, TPpToken* yylvalpp, int expandUndef) { Symbol *sym = LookUpSymbol(macros, atom); MacroInputSrc *in; int i, j, token; int depth = 0; if (atom == __LINE__Atom) { yylvalpp->ival = parseContext.currentLoc.line; sprintf(yylvalpp->name, "%d", yylvalpp->ival); UngetToken(CPP_INTCONSTANT, yylvalpp); return 1; } if (atom == __FILE__Atom) { yylvalpp->ival = parseContext.currentLoc.string; sprintf(yylvalpp->name, "%d", yylvalpp->ival); UngetToken(CPP_INTCONSTANT, yylvalpp); return 1; } if (atom == __VERSION__Atom) { yylvalpp->ival = parseContext.version; sprintf(yylvalpp->name, "%d", yylvalpp->ival); UngetToken(CPP_INTCONSTANT, yylvalpp); return 1; } // no recursive expansions if (sym && sym->details.mac.busy) return 0; // not expanding of undefined symbols if ((! sym || sym->details.mac.undef) && ! expandUndef) return 0; in = (MacroInputSrc*)malloc(sizeof(*in)); memset(in, 0, sizeof(*in)); in->base.line = currentInput->line; in->base.name = currentInput->name; if ((! sym || sym->details.mac.undef) && expandUndef) { // push input in->base.scan = zero_scan; in->base.prev = currentInput; currentInput = &in->base; return -1; } in->base.scan = macro_scan; in->mac = &sym->details.mac; if (sym->details.mac.args) { token = currentInput->scan(this, currentInput, yylvalpp); if (token != '(') { UngetToken(token, yylvalpp); yylvalpp->atom = atom; return 0; } in->args = (TokenStream**)malloc(in->mac->argc * sizeof(TokenStream *)); for (i = 0; i < in->mac->argc; i++) in->args[i] = NewTokenStream("macro arg", 0); i = 0; j = 0; do { depth = 0; while (1) { token = currentInput->scan(this, currentInput, yylvalpp); if (token <= 0) { parseContext.error(yylvalpp->loc, "EOF in macro", "preprocessor", GetStringOfAtom(&atomTable, atom)); return 1; } if ((in->mac->argc==0) && (token!=')')) break; if (depth == 0 && (token == ',' || token == ')')) break; if (token == '(') depth++; if (token == ')') depth--; RecordToken(in->args[i], token, yylvalpp); j=1; } if (token == ')') { if ((in->mac->argc==1) &&j==0) break; i++; break; } i++; } while (i < in->mac->argc); if (i < in->mac->argc) parseContext.error(yylvalpp->loc, "Too few args in Macro", "preprocessor", GetStringOfAtom(&atomTable, atom)); else if (token != ')') { depth=0; while (token >= 0 && (depth > 0 || token != ')')) { if (token == ')') depth--; token = currentInput->scan(this, currentInput, yylvalpp); if (token == '(') depth++; } if (token <= 0) { parseContext.error(yylvalpp->loc, "EOF in macro", "preprocessor", GetStringOfAtom(&atomTable, atom)); return 1; } parseContext.error(yylvalpp->loc, "Too many args in Macro", "preprocessor", GetStringOfAtom(&atomTable, atom)); } for (i = 0; i<in->mac->argc; i++) { in->args[i] = PrescanMacroArg(in->args[i], yylvalpp); } } #if 0 printf(" <%s:%d>found macro %s\n", GetAtomString(atable, loc.file), loc.line, GetAtomString(atable, atom)); for (i = 0; i<in->mac->argc; i++) { printf("\targ %s = '", GetAtomString(atable, in->mac->args[i])); DumpTokenStream(stdout, in->args[i]); printf("'\n"); } #endif /*retain the input source*/ in->base.prev = currentInput; sym->details.mac.busy = 1; RewindTokenStream(sym->details.mac.body); currentInput = &in->base; return 1; } // MacroExpand
int TPpContext::readCPPline(TPpToken * yylvalpp) { int token = currentInput->scan(this, currentInput, yylvalpp); bool isVersion = false; if (token == CPP_IDENTIFIER) { if (yylvalpp->atom == defineAtom) { token = CPPdefine(yylvalpp); } else if (yylvalpp->atom == elseAtom) { if (ChkCorrectElseNesting()) { if (! ifdepth) { parseContext.error(yylvalpp->loc, "mismatched statements", "#else", ""); } token = currentInput->scan(this, currentInput, yylvalpp); if (token != '\n') { parseContext.warn(yylvalpp->loc, "unexpected tokens following #else directive - expected a newline", "#else", ""); while (token != '\n') token = currentInput->scan(this, currentInput, yylvalpp); } token = CPPelse(0, yylvalpp); } else { parseContext.error(yylvalpp->loc, "#else after a #else", "#else", ""); ifdepth = 0; notAVersionToken = true; return 0; } } else if (yylvalpp->atom == elifAtom) { if (! ifdepth) { parseContext.error(yylvalpp->loc, "mismatched statements", "#elif", ""); } // this token is really a dont care, but we still need to eat the tokens token = currentInput->scan(this, currentInput, yylvalpp); while (token != '\n') token = currentInput->scan(this, currentInput, yylvalpp); token = CPPelse(0, yylvalpp); } else if (yylvalpp->atom == endifAtom) { elsedepth[elsetracker] = 0; --elsetracker; if (! ifdepth) parseContext.error(yylvalpp->loc, "mismatched statements", "#endif", ""); else --ifdepth; } else if (yylvalpp->atom == ifAtom) { token = CPPif (yylvalpp); } else if (yylvalpp->atom == ifdefAtom) { token = CPPifdef(1, yylvalpp); } else if (yylvalpp->atom == ifndefAtom) { token = CPPifdef(0, yylvalpp); } else if (yylvalpp->atom == lineAtom) { token = CPPline(yylvalpp); } else if (yylvalpp->atom == pragmaAtom) { token = CPPpragma(yylvalpp); } else if (yylvalpp->atom == undefAtom) { token = CPPundef(yylvalpp); } else if (yylvalpp->atom == errorAtom) { token = CPPerror(yylvalpp); } else if (yylvalpp->atom == versionAtom) { token = CPPversion(yylvalpp); isVersion = true; } else if (yylvalpp->atom == extensionAtom) { token = CPPextension(yylvalpp); } else { parseContext.error(yylvalpp->loc, "Invalid Directive", "#", GetStringOfAtom(&atomTable, yylvalpp->atom)); } } while (token != '\n' && token != 0 && token != EOF) { token = currentInput->scan(this, currentInput, yylvalpp); } notAVersionToken = ! isVersion; return token; } // readCPPline
int TPpContext::CPPdefine(TPpToken * yylvalpp) { int token, name, args[maxMacroArgs], argc; MacroSymbol mac; Symbol *symb; memset(&mac, 0, sizeof(mac)); token = currentInput->scan(this, currentInput, yylvalpp); if (token != CPP_IDENTIFIER) { parseContext.error(yylvalpp->loc, "must be followed by macro name", "#define", ""); return token; } name = yylvalpp->atom; token = currentInput->scan(this, currentInput, yylvalpp); if (token == '(' && !yylvalpp->ival) { // gather arguments argc = 0; do { token = currentInput->scan(this, currentInput, yylvalpp); if (argc == 0 && token == ')') break; if (token != CPP_IDENTIFIER) { parseContext.error(yylvalpp->loc, "bad argument", "#define", ""); return token; } if (argc < maxMacroArgs) args[argc++] = yylvalpp->atom; token = currentInput->scan(this, currentInput, yylvalpp); } while (token == ','); if (token != ')') { parseContext.error(yylvalpp->loc, "missing parenthesis", "#define", ""); return token; } mac.argc = argc; mac.args = (int*)mem_Alloc(macros->pool, argc * sizeof(int)); memcpy(mac.args, args, argc * sizeof(int)); token = currentInput->scan(this, currentInput, yylvalpp); } mac.body = NewTokenStream(GetAtomString(&atomTable, name), macros->pool); while (token != '\n') { while (token == '\\') { token = currentInput->scan(this, currentInput, yylvalpp); if (token == '\n') token = currentInput->scan(this, currentInput, yylvalpp); else RecordToken(mac.body, '\\', yylvalpp); } RecordToken(mac.body, token, yylvalpp); token = currentInput->scan(this, currentInput, yylvalpp); }; symb = LookUpSymbol(macros, name); if (symb) { if (!symb->details.mac.undef) { // already defined -- need to make sure they are identical if (symb->details.mac.argc != mac.argc) goto error; for (argc=0; argc < mac.argc; argc++) if (symb->details.mac.args[argc] != mac.args[argc]) goto error; RewindTokenStream(symb->details.mac.body); RewindTokenStream(mac.body); do { int old_lval, old_token; old_token = ReadToken(symb->details.mac.body, yylvalpp); old_lval = yylvalpp->ival; token = ReadToken(mac.body, yylvalpp); if (token != old_token || yylvalpp->ival != old_lval) { error: parseContext.error(yylvalpp->loc, "Macro Redefined", "#define", GetStringOfAtom(&atomTable, name)); break; } } while (token > 0); } //FreeMacro(&symb->details.mac); } else { symb = AddSymbol(&yylvalpp->loc, macros, name, MACRO_S); } symb->details.mac = mac; return '\n'; } // CPPdefine
int readCPPline(yystypepp * yylvalpp) { int token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); const char *message; int isVersion = 0; if (token == CPP_IDENTIFIER) { if (yylvalpp->sc_ident == defineAtom) { token = CPPdefine(yylvalpp); } else if (yylvalpp->sc_ident == elseAtom) { token = CPPgotoEndOfIfBlock(1, yylvalpp); if (yylvalpp->sc_ident != endifAtom) { CPPErrorToInfoLog("#else or #elif mismatch"); cpp->CompileError=1; } token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (token != '\n') CPPWarningToInfoLog("unexpected tokens following #else preprocessor directive - expected a newline"); if (!cpp->ifdepth){ CPPErrorToInfoLog("#else or #elif mismatch"); cpp->CompileError=1; } else --cpp->ifdepth; } else if (yylvalpp->sc_ident == elifAtom) { token = CPPgotoEndOfIfBlock(0, yylvalpp); assert(yylvalpp->sc_ident == endifAtom); token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); if (!cpp->ifdepth){ CPPErrorToInfoLog("#else or #elif mismatch"); cpp->CompileError=1; } else --cpp->ifdepth; } else if (yylvalpp->sc_ident == endifAtom) { if (!cpp->ifdepth){ CPPErrorToInfoLog("#endif mismatch"); cpp->CompileError=1; } else --cpp->ifdepth; } else if (yylvalpp->sc_ident == ifAtom) { token = CPPif(yylvalpp); } else if (yylvalpp->sc_ident == ifdefAtom) { token = CPPifdef(1, yylvalpp); } else if (yylvalpp->sc_ident == ifndefAtom) { token = CPPifdef(0, yylvalpp); } else if (yylvalpp->sc_ident == lineAtom) { token = CPPline(yylvalpp); } else if (yylvalpp->sc_ident == pragmaAtom) { token = CPPpragma(yylvalpp); } else if (yylvalpp->sc_ident == undefAtom) { token = CPPundef(yylvalpp); } else if (yylvalpp->sc_ident == errorAtom) { token = CPPerror(yylvalpp); } else if (yylvalpp->sc_ident == versionAtom) { token = CPPversion(yylvalpp); isVersion = 1; } else { StoreStr("Invalid Directive"); StoreStr(GetStringOfAtom(atable,yylvalpp->sc_ident)); message=GetStrfromTStr(); CPPShInfoLogMsg(message); ResetTString(); } } while (token != '\n' && token != 0 && token != EOF) { token = cpp->currentInput->scan(cpp->currentInput, yylvalpp); } cpp->notAVersionToken = !isVersion; return token; } // readCPPline