Branch: Tag:

1999-02-10

1999-02-10 01:29:43 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

UNDEFINED + ({}) and `+= implemented

Rev: src/docode.c:1.44
Rev: src/lex.c:1.62
Rev: src/modules/Gmp/mpz_glue.c:1.38
Rev: src/operators.c:1.46
Rev: src/program.c:1.109
Rev: src/program.h:1.50
Rev: src/security.c:1.10
Rev: src/testsuite.in:1.146

4:   ||| 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"
722:       switch(GETC())    { -  case '+': tmp="```+"; break; +     case '/': tmp="```/"; break;    case '%': tmp="```%"; break;    case '*': tmp="```*"; break;
730:    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; }