Alien-TinyCCx
    
    
  
  
  
view release on metacpan or search on metacpan
src/tccgen.c view on Meta::CPAN
        gen_op(TOK_SAR);
    }
}
/* cast 'vtop' to 'type'. Casting to bitfields is forbidden. */
static void gen_cast(CType *type)
{
    int sbt, dbt, sf, df, c, p;
    /* special delayed cast for char/short */
    /* XXX: in some cases (multiple cascaded casts), it may still
       be incorrect */
    if (vtop->r & VT_MUSTCAST) {
        vtop->r &= ~VT_MUSTCAST;
        force_charshort_cast(vtop->type.t);
    }
    /* bitfields first get cast to ints */
    if (vtop->type.t & VT_BITFIELD && !nocode_wanted) {
        gv(RC_INT);
    }
( run in 0.416 second using v1.01-cache-2.11-cpan-c333fce770f )