pike.git/ src/ las.c

1996-04-11

1996-04-11 21:14:28 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• e26068d11b3ef56830c44fdf5520e4edfed28971 (14 lines) (+11/-3) ^{[ Show | Annotate ]}
  Branch: branches/E-12

case -1 fixed

Rev: src/las.c:1.7

101:    case '?':    {    int tmp1,tmp2; -  tmp1=count_args(CDAR(n)); -  tmp2=count_args(CDAR(n)); +  tmp1=count_args(CADR(n)); +  tmp2=count_args(CDDR(n));    if(tmp1==-1 || tmp2==-2) return -1;    if(tmp1 < tmp2) return tmp1;    return tmp2;
164:    break;       case F_APPLY: +  if(a && a->token==F_CONSTANT && +  a->u.sval.type==T_FUNCTION && +  a->u.sval.subtype==-1) +  { +  res->node_info |= a->u.sval.u.efun->flags; +  }else{    res->node_info |= OPT_SIDE_EFFECT | OPT_EXTERNAL_DEPEND; /* for now */ -  +  }    break;       case F_RETURN: