diff --git a/vm.c b/vm.c index 50eed250..aac5eec1 100644 --- a/vm.c +++ b/vm.c @@ -1214,7 +1214,6 @@ sexp sexp_apply (sexp ctx, sexp proc, sexp args) { sexp_raise("byte-vector-set!: index out of range", sexp_list2(ctx, _ARG1, _ARG2)); sexp_bytes_set(_ARG1, _ARG2, _ARG3); top-=3; - _ARG1 = SEXP_VOID; break; case SEXP_OP_STRING_SET: if (! sexp_stringp(_ARG1)) @@ -1235,7 +1234,6 @@ sexp sexp_apply (sexp ctx, sexp proc, sexp args) { sexp_string_set(_ARG1, _ARG2, _ARG3); #endif top-=3; - _ARG1 = SEXP_VOID; break; #if SEXP_USE_UTF8_STRINGS case SEXP_OP_STRING_CURSOR_NEXT: