pike.git / src / lex.c

version» Context lines:

pike.git/src/lex.c:312:   {    static char buf[30];       if (n<F_MAX_OPCODE && instrs[n-F_OFFSET].name)    {    return instrs[n-F_OFFSET].name;    }else if(n >= F_MAX_OPCODE) {    if(p &&    (int)p->num_constants > (int)(n-F_MAX_OPCODE) &&    p->constants[n-F_MAX_OPCODE].type==T_FUNCTION && -  (p->constants[n-F_MAX_OPCODE].subtype == -1) && +  (p->constants[n-F_MAX_OPCODE].subtype == FUNCTION_BUILTIN) &&    p->constants[n-F_MAX_OPCODE].u.efun)    {    return p->constants[n-F_MAX_OPCODE].u.efun->name->str;    }else{    sprintf(buf, "Call efun %d", n - F_MAX_OPCODE);    return buf;    }    }else{    sprintf(buf, "<OTHER %d>", n);    return buf;
pike.git/src/lex.c:336:   char *get_f_name(int n)   {    static char buf[30];    if (n<F_MAX_OPCODE && instrs[n-F_OFFSET].name)    {    return instrs[n-F_OFFSET].name;    }else if(n >= F_MAX_OPCODE) {    if(fp && fp->context.prog &&    (int)fp->context.prog->num_constants > (int)(n-F_MAX_OPCODE) &&    fp->context.prog->constants[n-F_MAX_OPCODE].type==T_FUNCTION && -  (short)fp->context.prog->constants[n-F_MAX_OPCODE].subtype == -1 && +  fp->context.prog->constants[n-F_MAX_OPCODE].subtype == FUNCTION_BUILTIN &&    fp->context.prog->constants[n-F_MAX_OPCODE].u.efun)    {    return fp->context.prog->constants[n-F_MAX_OPCODE].u.efun->name->str;    }else{    sprintf(buf, "Call efun %d", n - F_MAX_OPCODE);    return buf;    }    }else{    sprintf(buf, "<OTHER %d>", n);    return buf;
pike.git/src/lex.c:670:    if(istate->gobble(c))    {    if(c=='\n') current_line++;    return 1;    }else{    return 0;    }   }      #define LOOK() (istate->look()) - #define SKIPWHITE() { int c; while(isspace(c=GETC())); UNGETC(c); } + #define SKIPWHITE() { int c; while(ISSPACE(c=GETC())); UNGETC(c); }   #define SKIPTO(X) { int c; while((c=GETC())!=(X) && (c!=MY_EOF)); }   #define SKIPUPTO(X) { int c; while((c=GETC())!=(X) && (c!=MY_EOF)); UNGETC(c); }   #define READBUF(X) { \    register unsigned INT32 p; \    register int C; \    for(p=0;(C=GETC())!=MY_EOF && p<sizeof(buf) && (X);p++) \    buf[p]=C; \    if(p==sizeof(buf)) { \    yyerror("Internal buffer overflow.\n"); p--; \    } \
pike.git/src/lex.c:896:    d->magic();    return 1;    }       if(d->args >= 0)    {    if(!save_newline)    {    SKIPWHITE();    }else{ -  do { e=GETC(); }while(isspace(e) && e!='\n'); +  do { e=GETC(); }while(ISSPACE(e) && e!='\n');    UNGETC(e);    }       if(GOBBLE('('))    {    int parlvl,quote;    int c;    args=0;       SKIPWHITE();
pike.git/src/lex.c:1106:    case 'l':    if(strcmp("line",buf)) break;    READBUF(C!=' ' && C!='\t' && C!='\n');       case '0': case '1': case '2': case '3': case '4':    case '5': case '6': case '7': case '8': case '9':    SKIPWHITE();    READBUF(C!='\n');    if(buf[0]=='"' &&    buf[strlen(buf)-1]=='2' && -  isspace(buf[strlen(buf)-2])) +  ISSPACE(buf[strlen(buf)-2]))    {    if(lvl)    {    yyerror("Unterminated '#if' conditional.");    num_parse_error+=1000;    }    }    continue;       case 'i':