pike.git / src / docode.c

version» Context lines:

pike.git/src/docode.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: docode.c,v 1.38 1998/05/25 10:38:44 hubbe Exp $"); + RCSID("$Id: docode.c,v 1.39 1998/07/31 06:51:41 hubbe Exp $");   #include "las.h"   #include "program.h"   #include "language.h"   #include "pike_types.h"   #include "stralloc.h"   #include "interpret.h"   #include "constants.h"   #include "array.h"   #include "pike_macros.h"   #include "error.h"
pike.git/src/docode.c:418:    emit2(flags & DO_POP ? F_ASSIGN_AND_POP:F_ASSIGN);    break;    }    return flags & DO_POP ? 0 : 1;    }       case F_LAND:    case F_LOR:    tmp1=alloc_label();    do_cond_jump(CAR(n), tmp1, n->token == F_LOR, 0); -  if(do_docode(CDR(n),0)!=1) fatal("Compiler logical error.\n"); +  code_expression(CDR(n), flags, n->token == F_LOR ? "||" : "&&");    emit(F_LABEL,tmp1);    return 1;       case F_EQ:    case F_NE:    case F_ADD:    case F_LT:    case F_LE:    case F_GT:    case F_GE: