static PTREE addPtIcUnsigned( // DECORATE TREE WITH PT_IC NODE (unsigned) PTREE tree, // - tree unsigned opcode, // - opcode unsigned value ) // - value { return addPtIc( tree, NodeIcUnsigned( opcode, value ) ); }
static PTREE insertCDtor( // INSERT CDTOR NODE INTO CALL LIST PTREE seq, // - argument sequence PTREE arg ) // - argument { PTREE* r_val; // - reference[ arg value ] PTREE val; // - arg value if( arg != NULL ) { r_val = PTreeRefRight( arg ); val = *r_val; if( val->op == PT_INT_CONSTANT ) { PTREE new_val = NodeIcUnsigned( IC_CDARG_VAL , val->u.uint_constant ); new_val->type = val->type; *r_val = new_val; PTreeFree( val ); } } return insertArg( seq, arg ); }