pike.git / src / lex.c

version» Context lines:

pike.git/src/lex.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: lex.c,v 1.61 1999/01/31 09:01:53 hubbe Exp $"); + RCSID("$Id: lex.c,v 1.62 1999/02/10 01:29:06 hubbe Exp $");   #include "language.h"   #include "array.h"   #include "lex.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "constants.h"   #include "hashtable.h"   #include "stuff.h"   #include "pike_memory.h"   #include "interpret.h"
pike.git/src/lex.c:715:       case '`':    {    char *tmp;    int offset=2;    if(GOBBLE('`')) offset--;    if(GOBBLE('`')) offset--;       switch(GETC())    { -  case '+': tmp="```+"; break; +     case '/': tmp="```/"; break;    case '%': tmp="```%"; break;    case '*': tmp="```*"; break;    case '&': tmp="```&"; break;    case '|': tmp="```|"; break;    case '^': tmp="```^"; break;    case '~': tmp="```~"; break; -  +  case '+': +  if(GOBBLE('=')) { tmp="```+="; break; } +  tmp="```+"; +  break;    case '<':    if(GOBBLE('<')) { tmp="```<<"; break; }    if(GOBBLE('=')) { tmp="```<="; break; }    tmp="```<";    break;       case '>':    if(GOBBLE('>')) { tmp="```>>"; break; }    if(GOBBLE('=')) { tmp="```>="; break; }    tmp="```>";