# HG changeset patch
# User anatofuz
# Date 1541232390 -32400
# Node ID 7c854b59b164c63050992b92a3fa329235e0927e
# Parent  401bbab649d69e3e786704ab5103a313250ca8d5
modified return_label so as not to transition to the next code segment

diff -r 401bbab649d6 -r 7c854b59b164 src/core/cbc-interp.cbc
--- a/src/core/cbc-interp.cbc	Fri Nov 02 19:49:50 2018 +0900
+++ b/src/core/cbc-interp.cbc	Sat Nov 03 17:06:30 2018 +0900
@@ -6417,14 +6417,14 @@
     MVM_debugserver_breakpoint_check(i->tc, file_idx, line_no);
     i->cur_op += 8;
     goto cbc_next(i);
-            }
+}
 __code cbc_coveragecontrol(INTERP i){
     MVMuint32 cc = (MVMuint32)GET_REG(i->cur_op, 0,i).i64;
     if (i->tc->instance->coverage_control && (cc == 0 || cc == 1))
         i->tc->instance->coverage_control = cc + 1;
     i->cur_op += 2;
     goto cbc_next(i);
-            }
+}
 
 __code cbc_return_label (INTERP i){
     /* Need to clear these pointer pointers since they may be rooted
@@ -6434,7 +6434,6 @@
     i->tc->interp_reg_base       = NULL;
     i->tc->interp_cu             = NULL;
     MVM_barrier();
-    goto cbc_next(i);
 }
 
 __code  cbc_op_call_extop (INTERP i) {