pike.git / lib / modules / Parser.pmod / Pike.pmod

version» Context lines:

pike.git/lib/modules/Parser.pmod/Pike.pmod:1:   //   // This file needs to support old pikes that e.g. don't understand   // "#pike". Some of them fail when they see an unknown cpp directive.   //   // #pike __REAL_VERSION__   // - // $Id: Pike.pmod,v 1.21 2002/06/28 17:30:19 nilsson Exp $ + // $Id: Pike.pmod,v 1.22 2002/07/14 17:05:52 nilsson Exp $      //! This module parses and tokanizes Pike source code.      inherit "C.pmod";      #define UNKNOWN_TOKEN \    throw( ({sprintf("Unknown pike token: %O\n",data[pos..pos+20]) }) )      static mapping(string : int) backquoteops =   (["/":1,
pike.git/lib/modules/Parser.pmod/Pike.pmod:134:    error("Failed to find end of preprocessor statement.\n");       while(data[pos-1]=='\\') pos=search(data,"\n",pos+1);    sscanf(data[start..pos],    "#%*[ \t]charset%*[ \t\\]%s%*[ \n]", string charset);    if(charset)    data = (data[0..pos]+    master()->decode_charset(data[pos+1..sizeof(data)-3],    charset)    +"\n\0"); // New end sentinel. +  pos++;    break;       case 'a'..'z':    case 'A'..'Z':    case 128..: // Lets simplify things for now...    case '_':    while(1)    {    switch(data[pos])    {