Skip to content

Commit cbc33cd

Browse files
committed
avoid more compiler warnings
1 parent fffa108 commit cbc33cd

File tree

1 file changed

+6
-0
lines changed

1 file changed

+6
-0
lines changed

src/ops/nqp_dyncall.ops

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -225,6 +225,8 @@ make_str_result(PARROT_INTERP, PMC *type, INTVAL ret_type, char *cstring) {
225225
case DYNCALL_ARG_UTF16STR:
226226
value = Parrot_str_new_init(interp, cstring, strlen(cstring), Parrot_utf16_encoding_ptr, 0);
227227
break;
228+
default:
229+
Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION, "Internal error: unhandled encoding");
228230
}
229231
result = REPR(type)->allocate(interp, STABLE(type));
230232
REPR(result)->initialize(interp, STABLE(result), OBJECT_BODY(result));
@@ -610,6 +612,8 @@ inline op nqp_native_call(out PMC, in PMC, in PMC, in PMC) :base_core {
610612
case DYNCALL_ARG_CALLBACK:
611613
/* XXX Above are all still todo. */
612614
dcArgPointer(vm, NULL);
615+
default:
616+
Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION, "Internal error: unhandled dyncall argument type");
613617
}
614618
}
615619

@@ -659,6 +663,8 @@ inline op nqp_native_call(out PMC, in PMC, in PMC, in PMC) :base_core {
659663
/* XXX Above are all still todo. */
660664
dcCallPointer(vm, body->entry_point);
661665
result = $2;
666+
default:
667+
Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION, "Internal error: unhandled dyncall return type");
662668
}
663669

664670
for (i = 0; i < body->num_args; i++) {

0 commit comments

Comments
 (0)