Roxen.git / server / base_server / highlight_pike.pike

version» Context lines:

Roxen.git/server/base_server/highlight_pike.pike:105:   {    string s,pre,post,decl;    int min=10000000000,i;    string mt;    foreach(types, s)    if(((i=search(in, s))!=-1) && i<min)    {    if(i) switch(in[i-1])    {    default: - // perror("Invalid type thingie: '"+in[i..i]+"'\n"); + // werror("Invalid type thingie: '"+in[i..i]+"'\n");    continue;    case ' ':    case '\n':    case '\r':    case '\t':    case '(':    case ')':    }    min = i;    mt = s;
Roxen.git/server/base_server/highlight_pike.pike:130:    if(sscanf(in, "%s"+s+"%s", pre, post)==2)    {    string op = post;    string p="";    sscanf(post, "%[ \t\n\r]%s", p, post);       p += find_complex_type(post);       p = op[..strlen(p)-1];    post = op[strlen(p)..]; - // perror("Found type: '%s' (left: %s)\n", s+p, post-"\n"); + // werror("Found type: '%s' (left: %s)\n", s+p, post-"\n");    return ({ pre, s+p, @find_decl(post) });    }   }      array (string) find_keyword(string in)   {    string s,pre,post;    foreach(keywords, s) if(sscanf(in, "%s"+s+"%s", pre, post)==2)    if(!strlen(pre) || pre[-1]==' ' || pre[-1]=='\t' || pre[-1]==':' ||    pre[-1]=='}' || pre[-1]==')' || pre[-1]==';' || pre[-1]=='\n')
Roxen.git/server/base_server/highlight_pike.pike:219:    ({ find_keyword, ({ 0, highlight_keyword }),}),    ({ find_case, ({ 0, highlight_case, 0, highlight_case, }),}),   });      #define push(X) res += X      string highlight_line(string l, mapping m)   {    array p,r;    string res = ""; - // perror(l+"\n"); + // werror(l+"\n");    foreach(highlight_patterns, p)    {    if(r=p[0](l))    { - // perror("Match %O (%s, %s)\n", p[-1][-1],(r[..sizeof(p[1])-1]*""), + // werror("Match %O (%s, %s)\n", p[-1][-1],(r[..sizeof(p[1])-1]*""),   // (r[sizeof(p[1])..]*""));    for(int i=0; i<sizeof(p[1]) && i<sizeof(r); i++)    if(functionp(p[1][i]))    push(p[1][i](r[i],m));    else    push(highlight_line(r[i],m));    for(int i=sizeof(p[1]); i<sizeof(r); i++)    push(highlight_line(r[i],m));    return res;    }