Branch: Tag:

2001-07-02

2001-07-02 07:02:45 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

more optimizations,

Rev: src/builtin_functions.c:1.389
Rev: src/docode.c:1.125
Rev: src/interpret_functions.h:1.67
Rev: src/peep.in:1.57

5:   \*/   /**/   #include "global.h" - RCSID("$Id: docode.c,v 1.124 2001/07/02 04:09:48 hubbe Exp $"); + RCSID("$Id: docode.c,v 1.125 2001/07/02 07:02:45 hubbe Exp $");   #include "las.h"   #include "program.h"   #include "pike_types.h"
810:    case F_LAND:    case F_LOR:    tmp1=alloc_label(); +  if(flags & DO_POP) +  { +  do_cond_jump(CAR(n), DO_NOT_WARN((INT32)tmp1), n->token == F_LOR, DO_POP); +  DO_CODE_BLOCK(CDR(n)); +  low_insert_label( DO_NOT_WARN((INT32)tmp1)); +  return 0; +  }else{    do_cond_jump(CAR(n), DO_NOT_WARN((INT32)tmp1), n->token == F_LOR, 0);    code_expression(CDR(n), flags, n->token == F_LOR ? "||" : "&&");    low_insert_label( DO_NOT_WARN((INT32)tmp1));    return 1; -  +  }       case F_EQ:    case F_NE: