File nqp.diff of Package nqp
--- ./src/6model/reprs/CArray.c.orig 2012-06-08 14:20:04.000000000 +0000
+++ ./src/6model/reprs/CArray.c 2012-06-08 14:21:43.000000000 +0000
@@ -248,6 +248,9 @@ static PMC * make_object(PARROT_INTERP,
return make_cpointer_result(interp, repr_data->elem_type, data);
case CARRAY_ELEM_KIND_CSTRUCT:
return make_cstruct_result(interp, repr_data->elem_type, data);
+ default:
+ Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION,
+ "make_object on CArray REPR with unknown element type");
}
}
static PMC * at_pos_boxed(PARROT_INTERP, STable *st, void *data, INTVAL index) {
--- ./src/6model/reprs/CStruct.c.orig 2012-06-08 14:15:54.000000000 +0000
+++ ./src/6model/reprs/CStruct.c 2012-06-08 14:19:00.000000000 +0000
@@ -501,7 +501,7 @@ static void bind_attribute_boxed(PARROT_
INTVAL real_slot = repr_data->attribute_locations[slot] >> CSTRUCT_ATTR_SHIFT;
if(IS_CONCRETE(value)) {
- STRING *value_type = REPR(value)->ID;
+ INTVAL value_type = REPR(value)->ID;
void *cobj = NULL;
body->child_objs[real_slot] = value;