pike.git / src / las.c

version» Context lines:

pike.git/src/las.c:159:    res->tree_info = 0;    switch(token)    {    case F_CATCH:    res->node_info |= OPT_SIDE_EFFECT;    break;       case F_APPLY:    if(a && a->token == F_CONSTANT &&    a->u.sval.type == T_FUNCTION && -  a->u.sval.subtype == -1) +  (short)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:    res->node_info |= OPT_RETURN;    break;
pike.git/src/las.c:407:    {    return mkefuncallnode("this_object", 0);   /* }else{    yyerror("Non-constant object pointer! (should not happen!)");    */    }    break;       case T_FUNCTION:    { -  if(s->subtype != -1) +  if((short)s->subtype != -1)    {    if(s->u.object == &fake_object)    return mkidentifiernode(s->subtype);      /* yyerror("Non-constant function pointer! (should not happen!)"); */    }    }    }       return mkconstantsvaluenode(s);
pike.git/src/las.c:1160: Inside #if defined(DEBUG)
   fprintf(stderr,"Optimizing: ");    print_tree(n);    }   #endif       switch(n->token)    {    case F_APPLY:    if(CAR(n)->token == F_CONSTANT &&    CAR(n)->u.sval.type == T_FUNCTION && -  CAR(n)->u.sval.subtype == -1 && /* driver fun? */ +  (short)CAR(n)->u.sval.subtype == -1 && /* driver fun? */    CAR(n)->u.sval.u.efun->optimize)    {    if(tmp1=CAR(n)->u.sval.u.efun->optimize(n))    goto use_tmp1;    }    break;       case F_ARG_LIST:    case F_LVALUE_LIST:    if(!CAR(n)) goto use_cdr;
pike.git/src/las.c:1365:    inc=0;       /* for(; arg1 oper arg2; z ++) p; */       opnode=CAR(n);       if(opnode->token == F_APPLY &&    CAR(opnode) &&    CAR(opnode)->token == F_CONSTANT &&    CAR(opnode)->u.sval.type == T_FUNCTION && -  CAR(opnode)->u.sval.subtype == -1) +  (short)CAR(opnode)->u.sval.subtype == -1)    {    if(CAR(opnode)->u.sval.u.efun->function == f_gt)    oper=F_GT;    else if(CAR(opnode)->u.sval.u.efun->function == f_ge)    oper=F_GE;    else if(CAR(opnode)->u.sval.u.efun->function == f_lt)    oper=F_LT;    else if(CAR(opnode)->u.sval.u.efun->function == f_le)    oper=F_LE;    else if(CAR(opnode)->u.sval.u.efun->function == f_ne)