[svn:parrot] r46962 - trunk/src/ops
bacek at svn.parrot.org
bacek at svn.parrot.org
Mon May 24 12:16:26 UTC 2010
Author: bacek
Date: Mon May 24 12:16:25 2010
New Revision: 46962
URL: https://trac.parrot.org/parrot/changeset/46962
Log:
Rebootstrap ops
Modified:
trunk/src/ops/core_ops.c
Modified: trunk/src/ops/core_ops.c
==============================================================================
--- trunk/src/ops/core_ops.c Mon May 24 12:16:09 2010 (r46961)
+++ trunk/src/ops/core_ops.c Mon May 24 12:16:25 2010 (r46962)
@@ -16737,7 +16737,7 @@
opcode_t *
Parrot_if_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= 0)
+ if (IREG(1) != 0)
return (opcode_t *)cur_opcode + cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
@@ -16769,7 +16769,7 @@
opcode_t *
Parrot_unless_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)== 0)
+ if (IREG(1) == 0)
return (opcode_t *)cur_opcode + cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
@@ -16877,7 +16877,8 @@
opcode_t *
Parrot_newclosure_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= parrot_new_closure(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = parrot_new_closure(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -16983,15 +16984,16 @@
/* If no elements, hand back empty array; otherwise PMC. */
if (!sig)
- PREG(1)= Parrot_pmc_new(interp, enum_class_FixedIntegerArray);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_FixedIntegerArray);
else
- PREG(1)= sig;
+ PREG(1) = sig;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_set_addr_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PTR2INTVAL(CUR_OPCODE + cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PTR2INTVAL(CUR_OPCODE + cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
@@ -17013,7 +17015,7 @@
Parrot_get_addr_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
void *ptr = VTABLE_get_pointer(interp, PREG(2));
- IREG(1)= (INTVAL)ptr;
+ IREG(1) = (INTVAL)ptr;
return (opcode_t *)cur_opcode + 3;}
@@ -17107,7 +17109,8 @@
opcode_t *
Parrot_count_eh_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_cx_count_handlers_local(interp,
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_cx_count_handlers_local(interp,
Parrot_str_new_constant(interp, "exception"));
return (opcode_t *)cur_opcode + 2;}
@@ -17185,7 +17188,7 @@
opcode_t *
Parrot_die_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)== EXCEPT_doomed)
+ if (IREG(1) == EXCEPT_doomed)
_exit(IREG(2));
else {
opcode_t * const ret = cur_opcode + 3;
@@ -17199,7 +17202,7 @@
opcode_t *
Parrot_die_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]== EXCEPT_doomed)
+ if (cur_opcode[1] == EXCEPT_doomed)
_exit(IREG(2));
else {
opcode_t * const ret = cur_opcode + 3;
@@ -17213,7 +17216,7 @@
opcode_t *
Parrot_die_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)== EXCEPT_doomed)
+ if (IREG(1) == EXCEPT_doomed)
_exit(cur_opcode[2]);
else {
opcode_t * const ret = cur_opcode + 3;
@@ -17227,7 +17230,7 @@
opcode_t *
Parrot_die_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]== EXCEPT_doomed)
+ if (cur_opcode[1] == EXCEPT_doomed)
_exit(cur_opcode[2]);
else {
opcode_t * const ret = cur_opcode + 3;
@@ -17277,7 +17280,7 @@
opcode_t *
Parrot_debug_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= 0) { Interp_debug_SET(interp, IREG(1)); }
+ if (IREG(1) != 0) { Interp_debug_SET(interp, IREG(1)); }
else { Interp_debug_CLEAR(interp, PARROT_ALL_DEBUG_FLAGS); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17285,7 +17288,7 @@
opcode_t *
Parrot_debug_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]!= 0) { Interp_debug_SET(interp, cur_opcode[1]); }
+ if (cur_opcode[1] != 0) { Interp_debug_SET(interp, cur_opcode[1]); }
else { Interp_debug_CLEAR(interp, PARROT_ALL_DEBUG_FLAGS); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17293,7 +17296,7 @@
opcode_t *
Parrot_bounds_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= 0) { Parrot_set_flag(interp, PARROT_BOUNDS_FLAG); }
+ if (IREG(1) != 0) { Parrot_set_flag(interp, PARROT_BOUNDS_FLAG); }
else { Interp_flags_CLEAR(interp, PARROT_BOUNDS_FLAG); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17301,7 +17304,7 @@
opcode_t *
Parrot_bounds_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]!= 0) { Parrot_set_flag(interp, PARROT_BOUNDS_FLAG); }
+ if (cur_opcode[1] != 0) { Parrot_set_flag(interp, PARROT_BOUNDS_FLAG); }
else { Interp_flags_CLEAR(interp, PARROT_BOUNDS_FLAG); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17309,7 +17312,7 @@
opcode_t *
Parrot_profile_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= 0) { Parrot_set_flag(interp, PARROT_PROFILE_FLAG); }
+ if (IREG(1) != 0) { Parrot_set_flag(interp, PARROT_PROFILE_FLAG); }
else { Interp_flags_CLEAR(interp, PARROT_PROFILE_FLAG); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17317,7 +17320,7 @@
opcode_t *
Parrot_profile_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]!= 0) { Parrot_set_flag(interp, PARROT_PROFILE_FLAG); }
+ if (cur_opcode[1] != 0) { Parrot_set_flag(interp, PARROT_PROFILE_FLAG); }
else { Interp_flags_CLEAR(interp, PARROT_PROFILE_FLAG); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17325,7 +17328,7 @@
opcode_t *
Parrot_trace_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= 0) { Parrot_set_trace(interp, IREG(1)); }
+ if (IREG(1) != 0) { Parrot_set_trace(interp, IREG(1)); }
else { Parrot_clear_trace(interp, PARROT_ALL_TRACE_FLAGS); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17333,7 +17336,7 @@
opcode_t *
Parrot_trace_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]!= 0) { Parrot_set_trace(interp, cur_opcode[1]); }
+ if (cur_opcode[1] != 0) { Parrot_set_trace(interp, cur_opcode[1]); }
else { Parrot_clear_trace(interp, PARROT_ALL_TRACE_FLAGS); }
interp->resume_offset = REL_PC + 2; interp->resume_flag = 1;return (opcode_t *)0;
}
@@ -17341,7 +17344,7 @@
opcode_t *
Parrot_gc_debug_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= 0) { Interp_flags_SET(interp, PARROT_GC_DEBUG_FLAG); }
+ if (IREG(1) != 0) { Interp_flags_SET(interp, PARROT_GC_DEBUG_FLAG); }
else { Interp_flags_CLEAR(interp, PARROT_GC_DEBUG_FLAG); }
return (opcode_t *)cur_opcode + 2;}
@@ -17349,32 +17352,36 @@
opcode_t *
Parrot_gc_debug_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]!= 0) { Interp_flags_SET(interp, PARROT_GC_DEBUG_FLAG); }
+ if (cur_opcode[1] != 0) { Interp_flags_SET(interp, PARROT_GC_DEBUG_FLAG); }
else { Interp_flags_CLEAR(interp, PARROT_GC_DEBUG_FLAG); }
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_interpinfo_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= interpinfo(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = interpinfo(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_interpinfo_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= interpinfo(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = interpinfo(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_interpinfo_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= interpinfo_p(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = interpinfo_p(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_interpinfo_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= interpinfo_p(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = interpinfo_p(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
@@ -17382,7 +17389,7 @@
Parrot_interpinfo_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
STRING * const s = interpinfo_s(interp, IREG(2));
- SREG(1)= s;
+ SREG(1) = s;
return (opcode_t *)cur_opcode + 3;}
@@ -17390,7 +17397,7 @@
Parrot_interpinfo_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
STRING * const s = interpinfo_s(interp, cur_opcode[2]);
- SREG(1)= s;
+ SREG(1) = s;
return (opcode_t *)cur_opcode + 3;}
@@ -17472,7 +17479,8 @@
opcode_t *
Parrot_getinterp_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, interp->iglobals,
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, interp->iglobals,
IGLOBALS_INTERPRETER);
return (opcode_t *)cur_opcode + 2;}
@@ -17532,37 +17540,43 @@
opcode_t *
Parrot_loadlib_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_load_lib(interp, SREG(2), NULL);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_load_lib(interp, SREG(2), NULL);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_loadlib_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_load_lib(interp, CONST(2)->u.string, NULL);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_load_lib(interp, CONST(2)->u.string, NULL);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_loadlib_p_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_load_lib(interp, SREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_load_lib(interp, SREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_loadlib_p_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_load_lib(interp, CONST(2)->u.string, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_load_lib(interp, CONST(2)->u.string, PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_loadlib_p_s_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_load_lib(interp, SREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_load_lib(interp, SREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_loadlib_p_sc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_load_lib(interp, CONST(2)->u.string, CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_load_lib(interp, CONST(2)->u.string, CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
@@ -17587,10 +17601,10 @@
const char * err = Parrot_dlerror();
Parrot_warn(interp, PARROT_WARNINGS_UNDEF_FLAG,
"Symbol '%s' not found: %s\n", name, err ? err : "unknown reason");
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
}
else {
- PREG(1)= Parrot_pmc_new(interp, enum_class_NCI);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_NCI);
VTABLE_set_pointer_keyed_str(interp, PREG(1), SREG(4), F2DPTR(p));
}
Parrot_str_free_cstring(name);
@@ -17618,10 +17632,10 @@
const char * err = Parrot_dlerror();
Parrot_warn(interp, PARROT_WARNINGS_UNDEF_FLAG,
"Symbol '%s' not found: %s\n", name, err ? err : "unknown reason");
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
}
else {
- PREG(1)= Parrot_pmc_new(interp, enum_class_NCI);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_NCI);
VTABLE_set_pointer_keyed_str(interp, PREG(1), SREG(4), F2DPTR(p));
}
Parrot_str_free_cstring(name);
@@ -17649,10 +17663,10 @@
const char * err = Parrot_dlerror();
Parrot_warn(interp, PARROT_WARNINGS_UNDEF_FLAG,
"Symbol '%s' not found: %s\n", name, err ? err : "unknown reason");
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
}
else {
- PREG(1)= Parrot_pmc_new(interp, enum_class_NCI);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_NCI);
VTABLE_set_pointer_keyed_str(interp, PREG(1), CONST(4)->u.string, F2DPTR(p));
}
Parrot_str_free_cstring(name);
@@ -17680,10 +17694,10 @@
const char * err = Parrot_dlerror();
Parrot_warn(interp, PARROT_WARNINGS_UNDEF_FLAG,
"Symbol '%s' not found: %s\n", name, err ? err : "unknown reason");
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
}
else {
- PREG(1)= Parrot_pmc_new(interp, enum_class_NCI);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_NCI);
VTABLE_set_pointer_keyed_str(interp, PREG(1), CONST(4)->u.string, F2DPTR(p));
}
Parrot_str_free_cstring(name);
@@ -17709,12 +17723,12 @@
const char * const err = Parrot_dlerror();
Parrot_warn(interp, PARROT_WARNINGS_UNDEF_FLAG,
"Symbol '%s' not found: %s\n", name, err ? err : "unknown reason");
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
}
else {
/* At this point we have the symbol's address. We just need to build
a PMC with it so we can get and set the value */
- PREG(1)= Parrot_pmc_new(interp, enum_class_UnManagedStruct);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_UnManagedStruct);
VTABLE_set_pointer(interp, PREG(1), p);
}
Parrot_str_free_cstring(name);
@@ -17740,12 +17754,12 @@
const char * const err = Parrot_dlerror();
Parrot_warn(interp, PARROT_WARNINGS_UNDEF_FLAG,
"Symbol '%s' not found: %s\n", name, err ? err : "unknown reason");
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
}
else {
/* At this point we have the symbol's address. We just need to build
a PMC with it so we can get and set the value */
- PREG(1)= Parrot_pmc_new(interp, enum_class_UnManagedStruct);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_UnManagedStruct);
VTABLE_set_pointer(interp, PREG(1), p);
}
Parrot_str_free_cstring(name);
@@ -17775,7 +17789,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const compreg_hash = VTABLE_get_pmc_keyed_int(interp,
interp->iglobals, IGLOBALS_COMPREG_HASH);
- PREG(1)= VTABLE_get_pmc_keyed_str(interp, compreg_hash, SREG(2));
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, compreg_hash, SREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -17784,19 +17798,21 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const compreg_hash = VTABLE_get_pmc_keyed_int(interp,
interp->iglobals, IGLOBALS_COMPREG_HASH);
- PREG(1)= VTABLE_get_pmc_keyed_str(interp, compreg_hash, CONST(2)->u.string);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, compreg_hash, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_new_callback_p_p_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_make_cb(interp, PREG(2), PREG(3), SREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_make_cb(interp, PREG(2), PREG(3), SREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_new_callback_p_p_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_make_cb(interp, PREG(2), PREG(3), CONST(4)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_make_cb(interp, PREG(2), PREG(3), CONST(4)->u.string);
return (opcode_t *)cur_opcode + 5;}
@@ -17805,11 +17821,11 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
if (interp->code->annotations) {
const opcode_t cur_pos = (cur_opcode + 2) - interp->code->base.data;
- PREG(1)= PackFile_Annotations_lookup(interp, interp->code->annotations,
+ PREG(1) = PackFile_Annotations_lookup(interp, interp->code->annotations,
cur_pos, NULL);
}
else {
- PREG(1)= Parrot_pmc_new(interp, enum_class_Hash);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Hash);
}
return (opcode_t *)cur_opcode + 2;}
@@ -17819,11 +17835,11 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
if (interp->code->annotations) {
const opcode_t cur_pos = (cur_opcode + 3) - interp->code->base.data;
- PREG(1)= PackFile_Annotations_lookup(interp, interp->code->annotations,
+ PREG(1) = PackFile_Annotations_lookup(interp, interp->code->annotations,
cur_pos, SREG(2));
}
else {
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
}
return (opcode_t *)cur_opcode + 3;}
@@ -17833,24 +17849,26 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
if (interp->code->annotations) {
const opcode_t cur_pos = (cur_opcode + 3) - interp->code->base.data;
- PREG(1)= PackFile_Annotations_lookup(interp, interp->code->annotations,
+ PREG(1) = PackFile_Annotations_lookup(interp, interp->code->annotations,
cur_pos, CONST(2)->u.string);
}
else {
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
}
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_band_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)&= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) &= IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_band_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)&= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) &= cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
@@ -17883,19 +17901,22 @@
opcode_t *
Parrot_band_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)& IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) & IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_band_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]& IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] & IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_band_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)& cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) & cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
@@ -17954,19 +17975,22 @@
opcode_t *
Parrot_bands_s_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_and(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_and(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bands_s_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_and(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_and(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bands_s_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_and(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_and(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
@@ -18000,13 +18024,15 @@
opcode_t *
Parrot_bnot_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= ~ IREG(1);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = ~ IREG(1);
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_bnot_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= ~ IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = ~ IREG(2);
return (opcode_t *)cur_opcode + 3;}
@@ -18024,19 +18050,21 @@
const INTVAL a = VTABLE_get_integer(interp, PREG(2));
PMC * const b = Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
VTABLE_set_integer_native(interp, b, ~a);
- PREG(1)= b;
+ PREG(1) = b;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_bnots_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_not(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_not(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_bnots_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_not(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_not(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
@@ -18060,13 +18088,15 @@
opcode_t *
Parrot_bor_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)|= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) |= IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_bor_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)|= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) |= cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
@@ -18097,19 +18127,22 @@
opcode_t *
Parrot_bor_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)| IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) | IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bor_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]| IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] | IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bor_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)| cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) | cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
@@ -18168,19 +18201,22 @@
opcode_t *
Parrot_bors_s_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_or(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_or(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bors_s_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_or(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_or(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bors_s_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_or(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_or(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
@@ -18214,13 +18250,15 @@
opcode_t *
Parrot_shl_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= bit_shift_left(IREG(1), IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = bit_shift_left(IREG(1), IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_shl_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= bit_shift_left(IREG(1), cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = bit_shift_left(IREG(1), cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
@@ -18254,19 +18292,22 @@
opcode_t *
Parrot_shl_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= bit_shift_left(IREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = bit_shift_left(IREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_shl_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= bit_shift_left(cur_opcode[2], IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = bit_shift_left(cur_opcode[2], IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_shl_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= bit_shift_left(IREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = bit_shift_left(IREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
@@ -18302,7 +18343,7 @@
Parrot_shr_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL signed_shift = -IREG(2);
- IREG(1)= bit_shift_left(IREG(1), signed_shift);
+ IREG(1) = bit_shift_left(IREG(1), signed_shift);
return (opcode_t *)cur_opcode + 3;}
@@ -18310,7 +18351,7 @@
Parrot_shr_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL signed_shift = -cur_opcode[2];
- IREG(1)= bit_shift_left(IREG(1), signed_shift);
+ IREG(1) = bit_shift_left(IREG(1), signed_shift);
return (opcode_t *)cur_opcode + 3;}
@@ -18346,7 +18387,7 @@
Parrot_shr_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL signed_shift = -IREG(3);
- IREG(1)= bit_shift_left(IREG(2), signed_shift);
+ IREG(1) = bit_shift_left(IREG(2), signed_shift);
return (opcode_t *)cur_opcode + 4;}
@@ -18354,7 +18395,7 @@
Parrot_shr_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL signed_shift = -IREG(3);
- IREG(1)= bit_shift_left(cur_opcode[2], signed_shift);
+ IREG(1) = bit_shift_left(cur_opcode[2], signed_shift);
return (opcode_t *)cur_opcode + 4;}
@@ -18362,7 +18403,7 @@
Parrot_shr_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL signed_shift = -cur_opcode[3];
- IREG(1)= bit_shift_left(IREG(2), signed_shift);
+ IREG(1) = bit_shift_left(IREG(2), signed_shift);
return (opcode_t *)cur_opcode + 4;}
@@ -18399,7 +18440,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const UINTVAL a = (UINTVAL)IREG(1);
const UINTVAL b = a >> IREG(2);
- IREG(1)= (INTVAL)b;
+ IREG(1) = (INTVAL)b;
return (opcode_t *)cur_opcode + 3;}
@@ -18408,7 +18449,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const UINTVAL a = (UINTVAL)IREG(1);
const UINTVAL b = a >> cur_opcode[2];
- IREG(1)= (INTVAL)b;
+ IREG(1) = (INTVAL)b;
return (opcode_t *)cur_opcode + 3;}
@@ -18442,19 +18483,22 @@
opcode_t *
Parrot_lsr_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (INTVAL)((UINTVAL)IREG(2)>> IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (INTVAL)((UINTVAL)IREG(2) >> IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_lsr_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (INTVAL)((UINTVAL)cur_opcode[2]>> IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (INTVAL)((UINTVAL)cur_opcode[2] >> IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_lsr_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (INTVAL)((UINTVAL)IREG(2)>> cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (INTVAL)((UINTVAL)IREG(2) >> cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
@@ -18501,7 +18545,7 @@
t = w - s;
t = (INTVAL)((UINTVAL)r >> t);
d |= t;
- IREG(1)= d;
+ IREG(1) = d;
return (opcode_t *)cur_opcode + 5;}
@@ -18518,7 +18562,7 @@
t = w - s;
t = (INTVAL)((UINTVAL)r >> t);
d |= t;
- IREG(1)= d;
+ IREG(1) = d;
return (opcode_t *)cur_opcode + 5;}
@@ -18535,19 +18579,21 @@
t = w - s;
t = (INTVAL)((UINTVAL)r >> t);
d |= t;
- IREG(1)= d;
+ IREG(1) = d;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_bxor_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)^= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) ^= IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_bxor_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)^= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) ^= cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
@@ -18581,19 +18627,22 @@
opcode_t *
Parrot_bxor_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)^ IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) ^ IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bxor_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]^ IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] ^ IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bxor_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)^ cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) ^ cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
@@ -18655,19 +18704,22 @@
opcode_t *
Parrot_bxors_s_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_xor(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_xor(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bxors_s_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_xor(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_xor(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_bxors_s_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_bitwise_xor(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_bitwise_xor(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
@@ -18702,7 +18754,7 @@
opcode_t *
Parrot_eq_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)== IREG(2)) {
+ if (IREG(1) == IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18711,7 +18763,7 @@
opcode_t *
Parrot_eq_ic_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]== IREG(2)) {
+ if (cur_opcode[1] == IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18720,7 +18772,7 @@
opcode_t *
Parrot_eq_i_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)== cur_opcode[2]) {
+ if (IREG(1) == cur_opcode[2]) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18729,7 +18781,7 @@
opcode_t *
Parrot_eq_n_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)== NREG(2)) {
+ if (NREG(1) == NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18738,7 +18790,7 @@
opcode_t *
Parrot_eq_nc_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.number== NREG(2)) {
+ if (CONST(1)->u.number == NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18747,7 +18799,7 @@
opcode_t *
Parrot_eq_n_nc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)== CONST(2)->u.number) {
+ if (NREG(1) == CONST(2)->u.number) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18888,7 +18940,7 @@
opcode_t *
Parrot_eq_addr_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(1)== SREG(2)) {
+ if (SREG(1) == SREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18897,7 +18949,7 @@
opcode_t *
Parrot_eq_addr_sc_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.string== SREG(2)) {
+ if (CONST(1)->u.string == SREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18906,7 +18958,7 @@
opcode_t *
Parrot_eq_addr_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(1)== CONST(2)->u.string) {
+ if (SREG(1) == CONST(2)->u.string) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18915,7 +18967,7 @@
opcode_t *
Parrot_eq_addr_sc_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.string== CONST(2)->u.string) {
+ if (CONST(1)->u.string == CONST(2)->u.string) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18924,7 +18976,7 @@
opcode_t *
Parrot_eq_addr_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (PREG(1)== PREG(2)) {
+ if (PREG(1) == PREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18933,7 +18985,7 @@
opcode_t *
Parrot_ne_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= IREG(2)) {
+ if (IREG(1) != IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18942,7 +18994,7 @@
opcode_t *
Parrot_ne_ic_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]!= IREG(2)) {
+ if (cur_opcode[1] != IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18951,7 +19003,7 @@
opcode_t *
Parrot_ne_i_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)!= cur_opcode[2]) {
+ if (IREG(1) != cur_opcode[2]) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18960,7 +19012,7 @@
opcode_t *
Parrot_ne_n_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)!= NREG(2)) {
+ if (NREG(1) != NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18969,7 +19021,7 @@
opcode_t *
Parrot_ne_nc_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.number!= NREG(2)) {
+ if (CONST(1)->u.number != NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -18978,7 +19030,7 @@
opcode_t *
Parrot_ne_n_nc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)!= CONST(2)->u.number) {
+ if (NREG(1) != CONST(2)->u.number) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19107,7 +19159,7 @@
opcode_t *
Parrot_ne_addr_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(1)!= SREG(2)) {
+ if (SREG(1) != SREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19116,7 +19168,7 @@
opcode_t *
Parrot_ne_addr_sc_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.string!= SREG(2)) {
+ if (CONST(1)->u.string != SREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19125,7 +19177,7 @@
opcode_t *
Parrot_ne_addr_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(1)!= CONST(2)->u.string) {
+ if (SREG(1) != CONST(2)->u.string) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19134,7 +19186,7 @@
opcode_t *
Parrot_ne_addr_sc_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.string!= CONST(2)->u.string) {
+ if (CONST(1)->u.string != CONST(2)->u.string) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19143,7 +19195,7 @@
opcode_t *
Parrot_ne_addr_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (PREG(1)!= PREG(2)) {
+ if (PREG(1) != PREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19152,7 +19204,7 @@
opcode_t *
Parrot_lt_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)< IREG(2)) {
+ if (IREG(1) < IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19161,7 +19213,7 @@
opcode_t *
Parrot_lt_ic_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]< IREG(2)) {
+ if (cur_opcode[1] < IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19170,7 +19222,7 @@
opcode_t *
Parrot_lt_i_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)< cur_opcode[2]) {
+ if (IREG(1) < cur_opcode[2]) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19179,7 +19231,7 @@
opcode_t *
Parrot_lt_n_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)< NREG(2)) {
+ if (NREG(1) < NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19188,7 +19240,7 @@
opcode_t *
Parrot_lt_nc_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.number< NREG(2)) {
+ if (CONST(1)->u.number < NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19197,7 +19249,7 @@
opcode_t *
Parrot_lt_n_nc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)< CONST(2)->u.number) {
+ if (NREG(1) < CONST(2)->u.number) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19326,7 +19378,7 @@
opcode_t *
Parrot_le_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)<= IREG(2)) {
+ if (IREG(1) <= IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19335,7 +19387,7 @@
opcode_t *
Parrot_le_ic_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[1]<= IREG(2)) {
+ if (cur_opcode[1] <= IREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19344,7 +19396,7 @@
opcode_t *
Parrot_le_i_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(1)<= cur_opcode[2]) {
+ if (IREG(1) <= cur_opcode[2]) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19353,7 +19405,7 @@
opcode_t *
Parrot_le_n_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)<= NREG(2)) {
+ if (NREG(1) <= NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19362,7 +19414,7 @@
opcode_t *
Parrot_le_nc_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(1)->u.number<= NREG(2)) {
+ if (CONST(1)->u.number <= NREG(2)) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19371,7 +19423,7 @@
opcode_t *
Parrot_le_n_nc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (NREG(1)<= CONST(2)->u.number) {
+ if (NREG(1) <= CONST(2)->u.number) {
return (opcode_t *)cur_opcode + cur_opcode[3];
}
@@ -19721,73 +19773,83 @@
opcode_t *
Parrot_cmp_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)< IREG(3)? -1 :
- IREG(2)> IREG(3)? +1 :
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) < IREG(3) ? -1 :
+ IREG(2) > IREG(3) ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]< IREG(3)? -1 :
- cur_opcode[2]> IREG(3)? +1 :
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] < IREG(3) ? -1 :
+ cur_opcode[2] > IREG(3) ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)< cur_opcode[3]? -1 :
- IREG(2)> cur_opcode[3]? +1 :
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) < cur_opcode[3] ? -1 :
+ IREG(2) > cur_opcode[3] ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)< NREG(3)? -1 :
- NREG(2)> NREG(3)? +1 :
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) < NREG(3) ? -1 :
+ NREG(2) > NREG(3) ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.number< NREG(3)? -1 :
- CONST(2)->u.number> NREG(3)? +1 :
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.number < NREG(3) ? -1 :
+ CONST(2)->u.number > NREG(3) ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)< CONST(3)->u.number? -1 :
- NREG(2)> CONST(3)->u.number? +1 :
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) < CONST(3)->u.number ? -1 :
+ NREG(2) > CONST(3)->u.number ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_cmp(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_cmp(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
@@ -19795,8 +19857,8 @@
Parrot_cmp_i_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL l = VTABLE_get_integer(interp, PREG(2));
- IREG(1)= l < IREG(3)? -1 :
- l > IREG(3)? +1 :
+ IREG(1) = l < IREG(3) ? -1 :
+ l > IREG(3) ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
@@ -19805,8 +19867,8 @@
Parrot_cmp_i_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL l = VTABLE_get_integer(interp, PREG(2));
- IREG(1)= l < cur_opcode[3]? -1 :
- l > cur_opcode[3]? +1 :
+ IREG(1) = l < cur_opcode[3] ? -1 :
+ l > cur_opcode[3] ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
@@ -19815,8 +19877,8 @@
Parrot_cmp_i_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const FLOATVAL l = VTABLE_get_number(interp, PREG(2));
- IREG(1)= l < NREG(3)? -1 :
- l > NREG(3)? +1 :
+ IREG(1) = l < NREG(3) ? -1 :
+ l > NREG(3) ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
@@ -19825,8 +19887,8 @@
Parrot_cmp_i_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const FLOATVAL l = VTABLE_get_number(interp, PREG(2));
- IREG(1)= l < CONST(3)->u.number? -1 :
- l > CONST(3)->u.number? +1 :
+ IREG(1) = l < CONST(3)->u.number ? -1 :
+ l > CONST(3)->u.number ? +1 :
0;
return (opcode_t *)cur_opcode + 4;}
@@ -19835,7 +19897,7 @@
Parrot_cmp_i_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
STRING* const l = VTABLE_get_string(interp, PREG(2));
- IREG(1)= Parrot_str_compare(interp, l, SREG(3));
+ IREG(1) = Parrot_str_compare(interp, l, SREG(3));
return (opcode_t *)cur_opcode + 4;}
@@ -19843,425 +19905,488 @@
Parrot_cmp_i_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
STRING* const l = VTABLE_get_string(interp, PREG(2));
- IREG(1)= Parrot_str_compare(interp, l, CONST(3)->u.string);
+ IREG(1) = Parrot_str_compare(interp, l, CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_str_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_cmp_string(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_cmp_string(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_num_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_cmp_num(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_cmp_num(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cmp_pmc_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_cmp_pmc(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_cmp_pmc(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_issame_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (PREG(2)== PREG(3))
- IREG(1)= 1;
+ if (PREG(2) == PREG(3))
+ IREG(1) = 1;
else
- IREG(1)= VTABLE_is_same(interp, PREG(2), PREG(3));
+ IREG(1) = VTABLE_is_same(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_issame_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= SREG(2)== SREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = SREG(2) == SREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_issame_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.string== SREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.string == SREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_issame_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= SREG(2)== CONST(3)->u.string;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = SREG(2) == CONST(3)->u.string;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_issame_i_sc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.string== CONST(3)->u.string;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.string == CONST(3)->u.string;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isntsame_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (PREG(2)== PREG(3))
- IREG(1)= 0;
+ if (PREG(2) == PREG(3))
+ IREG(1) = 0;
else
- IREG(1)= !VTABLE_is_same(interp, PREG(2), PREG(3));
+ IREG(1) = !VTABLE_is_same(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isntsame_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= SREG(2)!= SREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = SREG(2) != SREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isntsame_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.string!= SREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.string != SREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isntsame_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= SREG(2)!= CONST(3)->u.string;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = SREG(2) != CONST(3)->u.string;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isntsame_i_sc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.string!= CONST(3)->u.string;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.string != CONST(3)->u.string;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_istrue_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_get_bool(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_get_bool(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_isfalse_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= !VTABLE_get_bool(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = !VTABLE_get_bool(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_isnull_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_isnull_i_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(CONST(2)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(CONST(2)->u.key);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_isnull_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= STRING_IS_NULL(SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = STRING_IS_NULL(SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_isnull_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= STRING_IS_NULL(CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = STRING_IS_NULL(CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_isgt_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (VTABLE_cmp(interp, PREG(2), PREG(3)) > 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (VTABLE_cmp(interp, PREG(2), PREG(3)) > 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isge_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (VTABLE_cmp(interp, PREG(2), PREG(3)) >= 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (VTABLE_cmp(interp, PREG(2), PREG(3)) >= 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)<= IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) <= IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]<= IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] <= IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)<= cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) <= cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)<= NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) <= NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.number<= NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.number <= NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)<= CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) <= CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, SREG(2), SREG(3)) <= 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, SREG(2), SREG(3)) <= 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, CONST(2)->u.string, SREG(3)) <= 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, CONST(2)->u.string, SREG(3)) <= 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, SREG(2), CONST(3)->u.string) <= 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, SREG(2), CONST(3)->u.string) <= 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isle_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (VTABLE_cmp(interp, PREG(2), PREG(3)) <= 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (VTABLE_cmp(interp, PREG(2), PREG(3)) <= 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)< IREG(3)) ? 1 : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) < IREG(3)) ? 1 : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (cur_opcode[2]< IREG(3)) ? 1 : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (cur_opcode[2] < IREG(3)) ? 1 : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)< cur_opcode[3]) ? 1 : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) < cur_opcode[3]) ? 1 : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)< NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) < NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.number< NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.number < NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)< CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) < CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, SREG(2), SREG(3)) < 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, SREG(2), SREG(3)) < 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, CONST(2)->u.string, SREG(3)) < 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, CONST(2)->u.string, SREG(3)) < 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_compare(interp, SREG(2), CONST(3)->u.string) < 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_compare(interp, SREG(2), CONST(3)->u.string) < 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_islt_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (VTABLE_cmp(interp, PREG(2), PREG(3)) < 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (VTABLE_cmp(interp, PREG(2), PREG(3)) < 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)== IREG(3)) ? 1 : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) == IREG(3)) ? 1 : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (cur_opcode[2]== IREG(3)) ? 1 : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (cur_opcode[2] == IREG(3)) ? 1 : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)== cur_opcode[3]) ? 1 : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) == cur_opcode[3]) ? 1 : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)== NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) == NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.number== NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.number == NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)== CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) == CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (Parrot_str_equal(interp, SREG(2), SREG(3)) ? 1 : 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (Parrot_str_equal(interp, SREG(2), SREG(3)) ? 1 : 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (Parrot_str_equal(interp, CONST(2)->u.string, SREG(3)) ? 1 : 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (Parrot_str_equal(interp, CONST(2)->u.string, SREG(3)) ? 1 : 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (Parrot_str_equal(interp, SREG(2), CONST(3)->u.string) ? 1 : 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (Parrot_str_equal(interp, SREG(2), CONST(3)->u.string) ? 1 : 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_iseq_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (&PREG(2)== &PREG(3))
- IREG(1)= 1;
+ if (&PREG(2) == &PREG(3))
+ IREG(1) = 1;
else
- IREG(1)= VTABLE_is_equal(interp, PREG(2), PREG(3));
+ IREG(1) = VTABLE_is_equal(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)== IREG(3)) ? 0 : 1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) == IREG(3)) ? 0 : 1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (cur_opcode[2]== IREG(3)) ? 0 : 1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (cur_opcode[2] == IREG(3)) ? 0 : 1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)== cur_opcode[3]) ? 0 : 1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) == cur_opcode[3]) ? 0 : 1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)!= NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) != NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(2)->u.number!= NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(2)->u.number != NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= NREG(2)!= CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = NREG(2) != CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (Parrot_str_not_equal(interp, SREG(2), SREG(3)) ? 1 : 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (Parrot_str_not_equal(interp, SREG(2), SREG(3)) ? 1 : 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (Parrot_str_not_equal(interp, CONST(2)->u.string, SREG(3)) ? 1 : 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (Parrot_str_not_equal(interp, CONST(2)->u.string, SREG(3)) ? 1 : 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (Parrot_str_not_equal(interp, SREG(2), CONST(3)->u.string) ? 1 : 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (Parrot_str_not_equal(interp, SREG(2), CONST(3)->u.string) ? 1 : 0);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isne_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (&PREG(2)== &PREG(3))
- IREG(1)= 0;
+ if (&PREG(2) == &PREG(3))
+ IREG(1) = 0;
else
- IREG(1)= !VTABLE_is_equal(interp, PREG(2), PREG(3));
+ IREG(1) = !VTABLE_is_equal(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_and_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)? IREG(3): IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) ? IREG(3) : IREG(2);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_and_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]? IREG(3): cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] ? IREG(3) : cur_opcode[2];
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_and_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)? cur_opcode[3]: IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) ? cur_opcode[3] : IREG(2);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_and_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_logical_and(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_logical_and(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_not_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= ! IREG(1);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = ! IREG(1);
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_not_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= ! IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = ! IREG(2);
return (opcode_t *)cur_opcode + 3;}
@@ -20274,55 +20399,64 @@
opcode_t *
Parrot_not_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_logical_not(interp, PREG(2), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_logical_not(interp, PREG(2), PREG(1));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_or_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)? IREG(2): IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) ? IREG(2) : IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_or_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]? cur_opcode[2]: IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] ? cur_opcode[2] : IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_or_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)? IREG(2): cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) ? IREG(2) : cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_or_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_logical_or(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_logical_or(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_xor_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)&& ! IREG(3)) ? IREG(2): (IREG(3)&& ! IREG(2)) ? IREG(3): 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) && ! IREG(3)) ? IREG(2) : (IREG(3) && ! IREG(2)) ? IREG(3) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_xor_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (cur_opcode[2]&& ! IREG(3)) ? cur_opcode[2]: (IREG(3)&& ! cur_opcode[2]) ? IREG(3): 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (cur_opcode[2] && ! IREG(3)) ? cur_opcode[2] : (IREG(3) && ! cur_opcode[2]) ? IREG(3) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_xor_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (IREG(2)&& ! cur_opcode[3]) ? IREG(2): (cur_opcode[3]&& ! IREG(2)) ? cur_opcode[3]: 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (IREG(2) && ! cur_opcode[3]) ? IREG(2) : (cur_opcode[3] && ! IREG(2)) ? cur_opcode[3] : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_xor_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_logical_xor(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_logical_xor(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
@@ -20378,7 +20512,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
Parrot_Context_info info;
Parrot_Context_get_info(interp, CURRENT_CONTEXT(interp), &info);
- IREG(1)= info.line;
+ IREG(1) = info.line;
return (opcode_t *)cur_opcode + 2;}
@@ -20387,7 +20521,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
Parrot_Context_info info;
Parrot_Context_get_info(interp, CURRENT_CONTEXT(interp), &info);
- SREG(1)= info.file;
+ SREG(1) = info.file;
return (opcode_t *)cur_opcode + 2;}
@@ -20400,51 +20534,58 @@
opcode_t *
Parrot_fdopen_p_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)IREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)IREG(2), SREG(3));
if (!PREG(1))
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdopen_p_ic_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)cur_opcode[2], SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)cur_opcode[2], SREG(3));
if (!PREG(1))
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdopen_p_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)IREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)IREG(2), CONST(3)->u.string);
if (!PREG(1))
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdopen_p_ic_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)cur_opcode[2], CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_io_fdopen(interp, PMCNULL, (PIOHANDLE)cur_opcode[2], CONST(3)->u.string);
if (!PREG(1))
- PREG(1)= Parrot_pmc_new(interp, enum_class_Undef);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Undef);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_getstdin_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= _PIO_STDIN(interp);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = _PIO_STDIN(interp);
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_getstdout_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= _PIO_STDOUT(interp);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = _PIO_STDOUT(interp);
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_getstderr_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= _PIO_STDERR(interp);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = _PIO_STDERR(interp);
return (opcode_t *)cur_opcode + 2;}
@@ -20478,7 +20619,7 @@
return (opcode_t *)handler;
}
else {
- PREG(1)= Parrot_io_open(interp, PMCNULL, SREG(2), SREG(3));
+ PREG(1) = Parrot_io_open(interp, PMCNULL, SREG(2), SREG(3));
PARROT_ASSERT(! PMC_IS_NULL(PREG(1)));
}
@@ -20493,7 +20634,7 @@
return (opcode_t *)handler;
}
else {
- PREG(1)= Parrot_io_open(interp, PMCNULL, CONST(2)->u.string, SREG(3));
+ PREG(1) = Parrot_io_open(interp, PMCNULL, CONST(2)->u.string, SREG(3));
PARROT_ASSERT(! PMC_IS_NULL(PREG(1)));
}
@@ -20508,7 +20649,7 @@
return (opcode_t *)handler;
}
else {
- PREG(1)= Parrot_io_open(interp, PMCNULL, SREG(2), CONST(3)->u.string);
+ PREG(1) = Parrot_io_open(interp, PMCNULL, SREG(2), CONST(3)->u.string);
PARROT_ASSERT(! PMC_IS_NULL(PREG(1)));
}
@@ -20523,7 +20664,7 @@
return (opcode_t *)handler;
}
else {
- PREG(1)= Parrot_io_open(interp, PMCNULL, CONST(2)->u.string, CONST(3)->u.string);
+ PREG(1) = Parrot_io_open(interp, PMCNULL, CONST(2)->u.string, CONST(3)->u.string);
PARROT_ASSERT(! PMC_IS_NULL(PREG(1)));
}
@@ -20538,7 +20679,7 @@
return (opcode_t *)handler;
}
else {
- PREG(1)= Parrot_io_open(interp, PMCNULL, SREG(2), NULL);
+ PREG(1) = Parrot_io_open(interp, PMCNULL, SREG(2), NULL);
PARROT_ASSERT(! PMC_IS_NULL(PREG(1)));
}
@@ -20553,7 +20694,7 @@
return (opcode_t *)handler;
}
else {
- PREG(1)= Parrot_io_open(interp, PMCNULL, CONST(2)->u.string, NULL);
+ PREG(1) = Parrot_io_open(interp, PMCNULL, CONST(2)->u.string, NULL);
PARROT_ASSERT(! PMC_IS_NULL(PREG(1)));
}
@@ -20822,7 +20963,7 @@
opcode_t *
Parrot_print_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(2)&& PREG(1)) {
+ if (SREG(2) && PREG(1)) {
Parrot_io_putps(interp, PREG(1), SREG(2));
}
@@ -20831,7 +20972,7 @@
opcode_t *
Parrot_print_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(2)->u.string&& PREG(1)) {
+ if (CONST(2)->u.string && PREG(1)) {
Parrot_io_putps(interp, PREG(1), CONST(2)->u.string);
}
@@ -20840,7 +20981,7 @@
opcode_t *
Parrot_print_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (PREG(2)&& PREG(1)) {
+ if (PREG(2) && PREG(1)) {
STRING * const s = VTABLE_get_string(interp, PREG(2));
Parrot_io_putps(interp, PREG(1), s);
}
@@ -20849,31 +20990,36 @@
opcode_t *
Parrot_read_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_io_reads(interp, _PIO_STDIN(interp), (size_t)IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_io_reads(interp, _PIO_STDIN(interp), (size_t)IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_read_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_io_reads(interp, _PIO_STDIN(interp), (size_t)cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_io_reads(interp, _PIO_STDIN(interp), (size_t)cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_read_s_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_io_reads(interp, PREG(2), (size_t)IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_io_reads(interp, PREG(2), (size_t)IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_read_s_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_io_reads(interp, PREG(2), (size_t)cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_io_reads(interp, PREG(2), (size_t)cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_readline_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_io_readline(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_io_readline(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -20884,7 +21030,7 @@
*s = NULL;
if (Parrot_io_peek(interp, _PIO_STDIN(interp), s) < 0) {
- SREG(1)= STRINGNULL;
+ SREG(1) = STRINGNULL;
}
return (opcode_t *)cur_opcode + 2;}
@@ -20896,56 +21042,64 @@
*s = NULL;
if (Parrot_io_peek(interp, PREG(2), s) < 0) {
- SREG(1)= STRINGNULL;
+ SREG(1) = STRINGNULL;
}
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_stat_i_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_stat_info_intval(interp, SREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_stat_info_intval(interp, SREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_stat_info_intval(interp, CONST(2)->u.string, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_stat_info_intval(interp, CONST(2)->u.string, IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_stat_info_intval(interp, SREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_stat_info_intval(interp, SREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_stat_info_intval(interp, CONST(2)->u.string, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_stat_info_intval(interp, CONST(2)->u.string, cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_fstat_info_intval(interp, IREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_fstat_info_intval(interp, IREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_fstat_info_intval(interp, cur_opcode[2], IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_fstat_info_intval(interp, cur_opcode[2], IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_fstat_info_intval(interp, IREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_fstat_info_intval(interp, IREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_stat_i_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_fstat_info_intval(interp, cur_opcode[2], cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_fstat_info_intval(interp, cur_opcode[2], cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
@@ -21121,7 +21275,7 @@
Parrot_tell_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
if (PREG(2))
- IREG(1)= (INTVAL)Parrot_io_tell(interp, PREG(2));
+ IREG(1) = (INTVAL)Parrot_io_tell(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -21131,33 +21285,37 @@
if (PREG(3)) {
PIOOFF_T pos;
pos = Parrot_io_tell(interp, PREG(3));
- IREG(1)= (INTVAL)(pos >> 31);
- IREG(2)= (INTVAL)(pos & 0xffffffff);
+ IREG(1) = (INTVAL)(pos >> 31);
+ IREG(2) = (INTVAL)(pos & 0xffffffff);
}
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_abs_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= abs(IREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = abs(IREG(1));
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_abs_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= fabs(NREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = fabs(NREG(1));
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_abs_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= abs(IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = abs(IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_abs_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= fabs(NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = fabs(NREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -21170,31 +21328,36 @@
opcode_t *
Parrot_abs_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_absolute(interp, PREG(2), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_absolute(interp, PREG(2), PREG(1));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_add_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)+= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) += IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_add_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)+= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) += cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_add_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)+= NREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) += NREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_add_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)+= CONST(2)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) += CONST(2)->u.number;
return (opcode_t *)cur_opcode + 3;}
@@ -21235,67 +21398,78 @@
opcode_t *
Parrot_add_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)+ IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) + IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]+ IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] + IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)+ cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) + cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_n_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2)+ NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2) + NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_n_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= CONST(2)->u.number+ NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = CONST(2)->u.number + NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_n_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2)+ CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2) + CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_add(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_add(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_add_int(interp, PREG(2), IREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_add_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_add_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_add_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_p_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_add_float(interp, PREG(2), NREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_add_float(interp, PREG(2), NREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_add_p_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_add_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_add_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
return (opcode_t *)cur_opcode + 4;}
@@ -21303,13 +21477,13 @@
Parrot_cmod_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
INTVAL den = IREG(3);
- if (IREG(3)== 0) {
+ if (IREG(3) == 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_DIV_BY_ZERO,
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= IREG(2)% den;
+ IREG(1) = IREG(2) % den;
return (opcode_t *)cur_opcode + 4;}
@@ -21317,13 +21491,13 @@
Parrot_cmod_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
INTVAL den = IREG(3);
- if (IREG(3)== 0) {
+ if (IREG(3) == 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_DIV_BY_ZERO,
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= cur_opcode[2]% den;
+ IREG(1) = cur_opcode[2] % den;
return (opcode_t *)cur_opcode + 4;}
@@ -21331,13 +21505,13 @@
Parrot_cmod_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
INTVAL den = cur_opcode[3];
- if (cur_opcode[3]== 0) {
+ if (cur_opcode[3] == 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_DIV_BY_ZERO,
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= IREG(2)% den;
+ IREG(1) = IREG(2) % den;
return (opcode_t *)cur_opcode + 4;}
@@ -21346,7 +21520,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
INTVAL result;
- if (IREG(3)== 0) {
+ if (IREG(3) == 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_DIV_BY_ZERO,
"Divide by zero");
@@ -21355,7 +21529,7 @@
result = VTABLE_get_integer(interp, PREG(2)) % IREG(3);
- PREG(1)= Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
+ PREG(1) = Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
VTABLE_set_integer_native(interp, PREG(1), result);
return (opcode_t *)cur_opcode + 4;}
@@ -21365,7 +21539,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
INTVAL result;
- if (cur_opcode[3]== 0) {
+ if (cur_opcode[3] == 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_DIV_BY_ZERO,
"Divide by zero");
@@ -21374,7 +21548,7 @@
result = VTABLE_get_integer(interp, PREG(2)) % cur_opcode[3];
- PREG(1)= Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
+ PREG(1) = Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
VTABLE_set_integer_native(interp, PREG(1), result);
return (opcode_t *)cur_opcode + 4;}
@@ -21394,7 +21568,7 @@
result = VTABLE_get_integer(interp, PREG(2)) % value;
- PREG(1)= Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
+ PREG(1) = Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
VTABLE_set_integer_native(interp, PREG(1), result);
return (opcode_t *)cur_opcode + 4;}
@@ -21409,7 +21583,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= fmod(NREG(2), den);
+ NREG(1) = fmod(NREG(2), den);
return (opcode_t *)cur_opcode + 4;}
@@ -21423,7 +21597,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= fmod(CONST(2)->u.number, den);
+ NREG(1) = fmod(CONST(2)->u.number, den);
return (opcode_t *)cur_opcode + 4;}
@@ -21437,7 +21611,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= fmod(NREG(2), den);
+ NREG(1) = fmod(NREG(2), den);
return (opcode_t *)cur_opcode + 4;}
@@ -21456,7 +21630,7 @@
result = fmod(VTABLE_get_integer(interp, PREG(2)), value);
- PREG(1)= Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
+ PREG(1) = Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
VTABLE_set_integer_native(interp, PREG(1), (INTVAL) result);
return (opcode_t *)cur_opcode + 4;}
@@ -21476,20 +21650,22 @@
result = fmod(VTABLE_get_integer(interp, PREG(2)), value);
- PREG(1)= Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
+ PREG(1) = Parrot_pmc_new(interp, VTABLE_type(interp, PREG(2)));
VTABLE_set_integer_native(interp, PREG(1), (INTVAL) result);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_dec_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)--;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1)--;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_dec_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)--;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1)--;
return (opcode_t *)cur_opcode + 2;}
@@ -21510,7 +21686,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)/= den;
+ IREG(1) /= den;
return (opcode_t *)cur_opcode + 3;}
@@ -21524,7 +21700,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)/= den;
+ IREG(1) /= den;
return (opcode_t *)cur_opcode + 3;}
@@ -21538,7 +21714,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)/= den;
+ NREG(1) /= den;
return (opcode_t *)cur_opcode + 3;}
@@ -21552,7 +21728,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)/= den;
+ NREG(1) /= den;
return (opcode_t *)cur_opcode + 3;}
@@ -21601,7 +21777,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= IREG(2)/ den;
+ IREG(1) = IREG(2) / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21615,7 +21791,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= cur_opcode[2]/ den;
+ IREG(1) = cur_opcode[2] / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21629,7 +21805,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= IREG(2)/ den;
+ IREG(1) = IREG(2) / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21643,7 +21819,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- IREG(1)= cur_opcode[2]/ den;
+ IREG(1) = cur_opcode[2] / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21657,7 +21833,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= NREG(2)/ den;
+ NREG(1) = NREG(2) / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21671,7 +21847,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= CONST(2)->u.number/ den;
+ NREG(1) = CONST(2)->u.number / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21685,7 +21861,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= NREG(2)/ den;
+ NREG(1) = NREG(2) / den;
return (opcode_t *)cur_opcode + 4;}
@@ -21699,37 +21875,42 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= CONST(2)->u.number/ den;
+ NREG(1) = CONST(2)->u.number / den;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_div_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_divide(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_divide(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_div_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_divide_int(interp, PREG(2), IREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_divide_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_div_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_divide_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_divide_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_div_p_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_divide_float(interp, PREG(2), NREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_divide_float(interp, PREG(2), NREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_div_p_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_divide_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_divide_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
return (opcode_t *)cur_opcode + 4;}
@@ -21746,8 +21927,8 @@
return (opcode_t *)handler;
}
- f = floor(IREG(1)/ den);
- IREG(1)= (INTVAL)f;
+ f = floor(IREG(1) / den);
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 3;}
@@ -21764,8 +21945,8 @@
return (opcode_t *)handler;
}
- f = floor(IREG(1)/ den);
- IREG(1)= (INTVAL)f;
+ f = floor(IREG(1) / den);
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 3;}
@@ -21779,7 +21960,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= floor(NREG(1)/ den);
+ NREG(1) = floor(NREG(1) / den);
return (opcode_t *)cur_opcode + 3;}
@@ -21793,7 +21974,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= floor(NREG(1)/ den);
+ NREG(1) = floor(NREG(1) / den);
return (opcode_t *)cur_opcode + 3;}
@@ -21845,8 +22026,8 @@
return (opcode_t *)handler;
}
- f = floor(IREG(2)/ den);
- IREG(1)= (INTVAL)f;
+ f = floor(IREG(2) / den);
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 4;}
@@ -21863,8 +22044,8 @@
return (opcode_t *)handler;
}
- f = floor(cur_opcode[2]/ den);
- IREG(1)= (INTVAL)f;
+ f = floor(cur_opcode[2] / den);
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 4;}
@@ -21881,8 +22062,8 @@
return (opcode_t *)handler;
}
- f = floor(IREG(2)/ den);
- IREG(1)= (INTVAL)f;
+ f = floor(IREG(2) / den);
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 4;}
@@ -21896,7 +22077,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= floor(NREG(2)/ den);
+ NREG(1) = floor(NREG(2) / den);
return (opcode_t *)cur_opcode + 4;}
@@ -21910,7 +22091,7 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= floor(CONST(2)->u.number/ den);
+ NREG(1) = floor(CONST(2)->u.number / den);
return (opcode_t *)cur_opcode + 4;}
@@ -21924,43 +22105,49 @@
"Divide by zero");
return (opcode_t *)handler;
}
- NREG(1)= floor(NREG(2)/ den);
+ NREG(1) = floor(NREG(2) / den);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdiv_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_floor_divide(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_floor_divide(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdiv_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_floor_divide_int(interp, PREG(2), IREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_floor_divide_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdiv_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_floor_divide_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_floor_divide_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdiv_p_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_floor_divide_float(interp, PREG(2), NREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_floor_divide_float(interp, PREG(2), NREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_fdiv_p_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_floor_divide_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_floor_divide_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_ceil_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= ceil(NREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = ceil(NREG(1));
return (opcode_t *)cur_opcode + 2;}
@@ -21968,19 +22155,21 @@
Parrot_ceil_i_n(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
FLOATVAL f = ceil(NREG(2));
- IREG(1)= (INTVAL)f;
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_ceil_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= ceil(NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = ceil(NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_floor_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floor(NREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floor(NREG(1));
return (opcode_t *)cur_opcode + 2;}
@@ -21988,25 +22177,28 @@
Parrot_floor_i_n(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
FLOATVAL f = floor(NREG(2));
- IREG(1)= (INTVAL)f;
+ IREG(1) = (INTVAL)f;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_floor_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floor(NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floor(NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_inc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)++;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1)++;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_inc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)++;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1)++;
return (opcode_t *)cur_opcode + 2;}
@@ -22019,25 +22211,29 @@
opcode_t *
Parrot_mod_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= intval_mod(IREG(1), IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = intval_mod(IREG(1), IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_mod_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= intval_mod(IREG(1), cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = intval_mod(IREG(1), cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_mod_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floatval_mod(NREG(1), NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floatval_mod(NREG(1), NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_mod_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floatval_mod(NREG(1), CONST(2)->u.number);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floatval_mod(NREG(1), CONST(2)->u.number);
return (opcode_t *)cur_opcode + 3;}
@@ -22078,91 +22274,106 @@
opcode_t *
Parrot_mod_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= intval_mod(IREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = intval_mod(IREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= intval_mod(cur_opcode[2], IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = intval_mod(cur_opcode[2], IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= intval_mod(IREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = intval_mod(IREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_n_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floatval_mod(NREG(2), NREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floatval_mod(NREG(2), NREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_n_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floatval_mod(CONST(2)->u.number, NREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floatval_mod(CONST(2)->u.number, NREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_n_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= floatval_mod(NREG(2), CONST(3)->u.number);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = floatval_mod(NREG(2), CONST(3)->u.number);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_modulus(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_modulus(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_modulus_int(interp, PREG(2), IREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_modulus_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_modulus_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_modulus_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_p_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_modulus_float(interp, PREG(2), NREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_modulus_float(interp, PREG(2), NREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mod_p_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_modulus_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_modulus_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)*= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) *= IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_mul_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)*= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) *= cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_mul_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)*= NREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) *= NREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_mul_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)*= CONST(2)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) *= CONST(2)->u.number;
return (opcode_t *)cur_opcode + 3;}
@@ -22203,79 +22414,92 @@
opcode_t *
Parrot_mul_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)* IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) * IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]* IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] * IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)* cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) * cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_n_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2)* NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2) * NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_n_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= CONST(2)->u.number* NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = CONST(2)->u.number * NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_n_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2)* CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2) * CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_multiply(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_multiply(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_multiply_int(interp, PREG(2), IREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_multiply_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_multiply_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_multiply_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_p_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_multiply_float(interp, PREG(2), NREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_multiply_float(interp, PREG(2), NREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_mul_p_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_multiply_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_multiply_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_neg_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= - IREG(1);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = - IREG(1);
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_neg_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= - NREG(1);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = - NREG(1);
return (opcode_t *)cur_opcode + 2;}
@@ -22288,37 +22512,43 @@
opcode_t *
Parrot_neg_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= - IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = - IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_neg_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= - NREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = - NREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_neg_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_neg(interp, PREG(2), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_neg(interp, PREG(2), PREG(1));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_pow_n_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= pow((FLOATVAL)NREG(2), (FLOATVAL)NREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = pow((FLOATVAL)NREG(2), (FLOATVAL)NREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_pow_n_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= pow((FLOATVAL)CONST(2)->u.number, (FLOATVAL)NREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = pow((FLOATVAL)CONST(2)->u.number, (FLOATVAL)NREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_pow_n_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= pow((FLOATVAL)NREG(2), (FLOATVAL)CONST(3)->u.number);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = pow((FLOATVAL)NREG(2), (FLOATVAL)CONST(3)->u.number);
return (opcode_t *)cur_opcode + 4;}
@@ -22329,9 +22559,9 @@
const FLOATVAL b = VTABLE_get_number(interp, PREG(3));
const FLOATVAL c = pow(a, b);
if (PMC_IS_NULL(PREG(1)))
- PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
else
- PREG(1)= Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
+ PREG(1) = Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
VTABLE_set_number_native(interp, PREG(1), c);
return (opcode_t *)cur_opcode + 4;}
@@ -22343,9 +22573,9 @@
const FLOATVAL b = (FLOATVAL)IREG(3);
const FLOATVAL c = pow(a, b);
if (PMC_IS_NULL(PREG(1)))
- PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
else
- PREG(1)= Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
+ PREG(1) = Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
VTABLE_set_number_native(interp, PREG(1), c);
return (opcode_t *)cur_opcode + 4;}
@@ -22357,9 +22587,9 @@
const FLOATVAL b = (FLOATVAL)cur_opcode[3];
const FLOATVAL c = pow(a, b);
if (PMC_IS_NULL(PREG(1)))
- PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
else
- PREG(1)= Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
+ PREG(1) = Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
VTABLE_set_number_native(interp, PREG(1), c);
return (opcode_t *)cur_opcode + 4;}
@@ -22370,9 +22600,9 @@
const FLOATVAL a = VTABLE_get_number(interp, PREG(2));
const FLOATVAL c = pow(a, NREG(3));
if (PMC_IS_NULL(PREG(1)))
- PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
else
- PREG(1)= Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
+ PREG(1) = Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
VTABLE_set_number_native(interp, PREG(1), c);
return (opcode_t *)cur_opcode + 4;}
@@ -22383,9 +22613,9 @@
const FLOATVAL a = VTABLE_get_number(interp, PREG(2));
const FLOATVAL c = pow(a, CONST(3)->u.number);
if (PMC_IS_NULL(PREG(1)))
- PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
else
- PREG(1)= Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
+ PREG(1) = Parrot_pmc_new(interp, PREG(1)->vtable->base_type);
VTABLE_set_number_native(interp, PREG(1), c);
return (opcode_t *)cur_opcode + 4;}
@@ -22413,7 +22643,7 @@
if (s < 0) {
res = 1.0/res;
}
- NREG(1)= res;
+ NREG(1) = res;
return (opcode_t *)cur_opcode + 4;}
@@ -22440,7 +22670,7 @@
if (s < 0) {
res = 1.0/res;
}
- NREG(1)= res;
+ NREG(1) = res;
return (opcode_t *)cur_opcode + 4;}
@@ -22467,7 +22697,7 @@
if (s < 0) {
res = 1.0/res;
}
- NREG(1)= res;
+ NREG(1) = res;
return (opcode_t *)cur_opcode + 4;}
@@ -22494,31 +22724,35 @@
if (s < 0) {
res = 1.0/res;
}
- NREG(1)= res;
+ NREG(1) = res;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)-= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) -= IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sub_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)-= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) -= cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sub_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)-= NREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) -= NREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sub_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)-= CONST(2)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) -= CONST(2)->u.number;
return (opcode_t *)cur_opcode + 3;}
@@ -22559,145 +22793,169 @@
opcode_t *
Parrot_sub_i_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)- IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) - IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_i_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2]- IREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2] - IREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_i_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2)- cur_opcode[3];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2) - cur_opcode[3];
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_n_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2)- NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2) - NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_n_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= CONST(2)->u.number- NREG(3);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = CONST(2)->u.number - NREG(3);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_n_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2)- CONST(3)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2) - CONST(3)->u.number;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_subtract(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_subtract(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_subtract_int(interp, PREG(2), IREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_subtract_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_subtract_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_subtract_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_p_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_subtract_float(interp, PREG(2), NREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_subtract_float(interp, PREG(2), NREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sub_p_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_subtract_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_subtract_float(interp, PREG(2), CONST(3)->u.number, PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sqrt_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= sqrt((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = sqrt((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_acos_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= acos((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = acos((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_asec_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= acos(((FLOATVAL)1) / ((FLOATVAL)NREG(2)));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = acos(((FLOATVAL)1) / ((FLOATVAL)NREG(2)));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_asin_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= asin((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = asin((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_atan_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= atan((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = atan((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_atan_n_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= atan2((FLOATVAL)NREG(2), (FLOATVAL)NREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = atan2((FLOATVAL)NREG(2), (FLOATVAL)NREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_atan_n_nc_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= atan2((FLOATVAL)CONST(2)->u.number, (FLOATVAL)NREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = atan2((FLOATVAL)CONST(2)->u.number, (FLOATVAL)NREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_atan_n_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= atan2((FLOATVAL)NREG(2), (FLOATVAL)CONST(3)->u.number);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = atan2((FLOATVAL)NREG(2), (FLOATVAL)CONST(3)->u.number);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_cos_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= cos((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = cos((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_cosh_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= cosh((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = cosh((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_exp_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= exp((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = exp((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_ln_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= log((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = log((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_log10_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= log10((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = log10((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -22705,43 +22963,49 @@
Parrot_log2_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
FLOATVAL temp = log((FLOATVAL)2.0);
- NREG(1)= log((FLOATVAL)NREG(2)) / temp;
+ NREG(1) = log((FLOATVAL)NREG(2)) / temp;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sec_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= ((FLOATVAL)1) / cos((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = ((FLOATVAL)1) / cos((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sech_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= ((FLOATVAL)1) / cosh((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = ((FLOATVAL)1) / cosh((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sin_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= sin((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = sin((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sinh_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= sinh((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = sinh((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_tan_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= tan((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = tan((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_tanh_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= tanh((FLOATVAL)NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = tanh((FLOATVAL)NREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -22993,61 +23257,71 @@
opcode_t *
Parrot_can_i_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_can(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_can(interp, PREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_can_i_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_can(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_can(interp, PREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_does_i_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= SREG(3)? VTABLE_does(interp, PREG(2), SREG(3)) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = SREG(3) ? VTABLE_does(interp, PREG(2), SREG(3)) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_does_i_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(3)->u.string? VTABLE_does(interp, PREG(2), CONST(3)->u.string) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(3)->u.string ? VTABLE_does(interp, PREG(2), CONST(3)->u.string) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_does_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PREG(3)? VTABLE_does_pmc(interp, PREG(2), PREG(3)) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PREG(3) ? VTABLE_does_pmc(interp, PREG(2), PREG(3)) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_does_i_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(3)->u.key? VTABLE_does_pmc(interp, PREG(2), CONST(3)->u.key) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(3)->u.key ? VTABLE_does_pmc(interp, PREG(2), CONST(3)->u.key) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isa_i_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= SREG(3)? VTABLE_isa(interp, PREG(2), SREG(3)) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = SREG(3) ? VTABLE_isa(interp, PREG(2), SREG(3)) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isa_i_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(3)->u.string? VTABLE_isa(interp, PREG(2), CONST(3)->u.string) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(3)->u.string ? VTABLE_isa(interp, PREG(2), CONST(3)->u.string) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isa_i_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PREG(3)? VTABLE_isa_pmc(interp, PREG(2), PREG(3)) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PREG(3) ? VTABLE_isa_pmc(interp, PREG(2), PREG(3)) : 0;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_isa_i_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= CONST(3)->u.key? VTABLE_isa_pmc(interp, PREG(2), CONST(3)->u.key) : 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = CONST(3)->u.key ? VTABLE_isa_pmc(interp, PREG(2), CONST(3)->u.key) : 0;
return (opcode_t *)cur_opcode + 4;}
@@ -23056,7 +23330,7 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const name = Parrot_pmc_new(interp, enum_class_String);
VTABLE_set_string_native(interp, name, SREG(2));
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, name);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, name);
return (opcode_t *)cur_opcode + 3;}
@@ -23065,19 +23339,21 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const name = Parrot_pmc_new(interp, enum_class_String);
VTABLE_set_string_native(interp, name, CONST(2)->u.string);
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, name);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, name);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_newclass_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_newclass_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, CONST(2)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, CONST(2)->u.key);
return (opcode_t *)cur_opcode + 3;}
@@ -23093,7 +23369,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, PREG(2)));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new(interp, enum_class_Class);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Class);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23110,7 +23386,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, CONST(2)->u.key));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new(interp, enum_class_Class);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Class);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23127,7 +23403,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, PREG(2)));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, SREG(3));
+ PREG(1) = Parrot_oo_newclass_from_str(interp, SREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23144,7 +23420,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, CONST(2)->u.key));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, SREG(3));
+ PREG(1) = Parrot_oo_newclass_from_str(interp, SREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23161,7 +23437,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, PREG(2)));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
+ PREG(1) = Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23178,7 +23454,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, CONST(2)->u.key));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
+ PREG(1) = Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23195,7 +23471,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, PREG(2)));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23212,7 +23488,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, CONST(2)->u.key));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23229,7 +23505,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, PREG(2)));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23246,7 +23522,7 @@
"Class '%Ss' doesn't exist", VTABLE_get_string(interp, CONST(2)->u.key));
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23264,7 +23540,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new(interp, enum_class_Class);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Class);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23282,7 +23558,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new(interp, enum_class_Class);
+ PREG(1) = Parrot_pmc_new(interp, enum_class_Class);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23300,7 +23576,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, SREG(3));
+ PREG(1) = Parrot_oo_newclass_from_str(interp, SREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23318,7 +23594,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, SREG(3));
+ PREG(1) = Parrot_oo_newclass_from_str(interp, SREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23336,7 +23612,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
+ PREG(1) = Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23354,7 +23630,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
+ PREG(1) = Parrot_oo_newclass_from_str(interp, CONST(3)->u.string);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23372,7 +23648,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23390,7 +23666,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, PREG(3));
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23408,7 +23684,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
@@ -23426,38 +23702,43 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, enum_class_Class, CONST(3)->u.key);
VTABLE_add_parent(interp, PREG(1), parent_class);
return (opcode_t *)next;
}
opcode_t *
Parrot_get_class_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_oo_get_class_str(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_oo_get_class_str(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_get_class_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_oo_get_class_str(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_oo_get_class_str(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_get_class_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_oo_get_class(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_oo_get_class(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_get_class_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_oo_get_class(interp, CONST(2)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_oo_get_class(interp, CONST(2)->u.key);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_class_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_class(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_class(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -23532,37 +23813,43 @@
opcode_t *
Parrot_getattribute_p_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_attr_str(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_attr_str(interp, PREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_getattribute_p_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_attr_str(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_attr_str(interp, PREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_getattribute_p_p_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_attr_keyed(interp, PREG(2), PREG(3), SREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_attr_keyed(interp, PREG(2), PREG(3), SREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_getattribute_p_p_pc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_attr_keyed(interp, PREG(2), CONST(3)->u.key, SREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_attr_keyed(interp, PREG(2), CONST(3)->u.key, SREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_getattribute_p_p_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_attr_keyed(interp, PREG(2), PREG(3), CONST(4)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_attr_keyed(interp, PREG(2), PREG(3), CONST(4)->u.string);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_getattribute_p_p_pc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_attr_keyed(interp, PREG(2), CONST(3)->u.key, CONST(4)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_attr_keyed(interp, PREG(2), CONST(3)->u.key, CONST(4)->u.string);
return (opcode_t *)cur_opcode + 5;}
@@ -23610,37 +23897,43 @@
opcode_t *
Parrot_inspect_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_inspect(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_inspect(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_inspect_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_inspect(interp, CONST(2)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_inspect(interp, CONST(2)->u.key);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_inspect_p_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_inspect_str(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_inspect_str(interp, PREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_inspect_p_pc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_inspect_str(interp, CONST(2)->u.key, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_inspect_str(interp, CONST(2)->u.key, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_inspect_p_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_inspect_str(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_inspect_str(interp, PREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_inspect_p_pc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_inspect_str(interp, CONST(2)->u.key, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_inspect_str(interp, CONST(2)->u.key, CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
@@ -23653,7 +23946,7 @@
: PMCNULL;
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, _class, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
if (type <= 0) {
@@ -23662,7 +23955,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
return (opcode_t *)cur_opcode + 3;}
@@ -23676,7 +23969,7 @@
: PMCNULL;
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, _class, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
if (type <= 0) {
@@ -23685,7 +23978,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
return (opcode_t *)cur_opcode + 3;}
@@ -23699,7 +23992,7 @@
: PMCNULL;
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PREG(3));
+ PREG(1) = VTABLE_instantiate(interp, _class, PREG(3));
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
if (type <= 0) {
@@ -23708,7 +24001,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, type, PREG(3));
}
return (opcode_t *)cur_opcode + 4;}
@@ -23722,7 +24015,7 @@
: PMCNULL;
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PREG(3));
+ PREG(1) = VTABLE_instantiate(interp, _class, PREG(3));
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
if (type <= 0) {
@@ -23731,7 +24024,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, type, PREG(3));
}
return (opcode_t *)cur_opcode + 4;}
@@ -23745,7 +24038,7 @@
: PMCNULL;
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, CONST(3)->u.key);
+ PREG(1) = VTABLE_instantiate(interp, _class, CONST(3)->u.key);
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
if (type <= 0) {
@@ -23754,7 +24047,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
}
return (opcode_t *)cur_opcode + 4;}
@@ -23768,7 +24061,7 @@
: PMCNULL;
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, CONST(3)->u.key);
+ PREG(1) = VTABLE_instantiate(interp, _class, CONST(3)->u.key);
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
if (type <= 0) {
@@ -23777,7 +24070,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
}
return (opcode_t *)cur_opcode + 4;}
@@ -23789,7 +24082,7 @@
PMC * const _class = Parrot_oo_get_class(interp, name_key);
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, _class, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, name_key);
if (type <= 0) {
@@ -23798,7 +24091,7 @@
"Class '%Ss' not found", VTABLE_get_repr(interp, name_key));
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
return (opcode_t *)cur_opcode + 3;}
@@ -23810,7 +24103,7 @@
PMC * const _class = Parrot_oo_get_class(interp, name_key);
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, _class, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, name_key);
if (type <= 0) {
@@ -23819,7 +24112,7 @@
"Class '%Ss' not found", VTABLE_get_repr(interp, name_key));
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
return (opcode_t *)cur_opcode + 3;}
@@ -23831,7 +24124,7 @@
PMC * const _class = Parrot_oo_get_class(interp, name_key);
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PREG(3));
+ PREG(1) = VTABLE_instantiate(interp, _class, PREG(3));
else {
const INTVAL type = Parrot_pmc_get_type(interp, name_key);
if (type <= 0) {
@@ -23840,7 +24133,7 @@
"Class '%Ss' not found", VTABLE_get_repr(interp, name_key));
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, type, PREG(3));
}
return (opcode_t *)cur_opcode + 4;}
@@ -23852,7 +24145,7 @@
PMC * const _class = Parrot_oo_get_class(interp, name_key);
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, PREG(3));
+ PREG(1) = VTABLE_instantiate(interp, _class, PREG(3));
else {
const INTVAL type = Parrot_pmc_get_type(interp, name_key);
if (type <= 0) {
@@ -23861,7 +24154,7 @@
"Class '%Ss' not found", VTABLE_get_repr(interp, name_key));
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, PREG(3));
+ PREG(1) = Parrot_pmc_new_init(interp, type, PREG(3));
}
return (opcode_t *)cur_opcode + 4;}
@@ -23873,7 +24166,7 @@
PMC * const _class = Parrot_oo_get_class(interp, name_key);
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, CONST(3)->u.key);
+ PREG(1) = VTABLE_instantiate(interp, _class, CONST(3)->u.key);
else {
const INTVAL type = Parrot_pmc_get_type(interp, name_key);
if (type <= 0) {
@@ -23882,7 +24175,7 @@
"Class '%Ss' not found", VTABLE_get_repr(interp, name_key));
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
}
return (opcode_t *)cur_opcode + 4;}
@@ -23894,7 +24187,7 @@
PMC * const _class = Parrot_oo_get_class(interp, name_key);
if (!PMC_IS_NULL(_class))
- PREG(1)= VTABLE_instantiate(interp, _class, CONST(3)->u.key);
+ PREG(1) = VTABLE_instantiate(interp, _class, CONST(3)->u.key);
else {
const INTVAL type = Parrot_pmc_get_type(interp, name_key);
if (type <= 0) {
@@ -23903,7 +24196,7 @@
"Class '%Ss' not found", VTABLE_get_repr(interp, name_key));
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
+ PREG(1) = Parrot_pmc_new_init(interp, type, CONST(3)->u.key);
}
return (opcode_t *)cur_opcode + 4;}
@@ -23919,7 +24212,7 @@
if (!PMC_IS_NULL(ns))
classobj = Parrot_oo_get_class(interp, ns);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, cur_opcode + 3,
EXCEPTION_NO_CLASS,
@@ -23940,7 +24233,7 @@
if (!PMC_IS_NULL(ns))
classobj = Parrot_oo_get_class(interp, ns);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, cur_opcode + 3,
EXCEPTION_NO_CLASS,
@@ -23961,7 +24254,7 @@
if (!PMC_IS_NULL(ns))
classobj = Parrot_oo_get_class(interp, ns);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PREG(3));
+ PREG(1) = VTABLE_instantiate(interp, classobj, PREG(3));
else {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_NO_CLASS,
@@ -23982,7 +24275,7 @@
if (!PMC_IS_NULL(ns))
classobj = Parrot_oo_get_class(interp, ns);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PREG(3));
+ PREG(1) = VTABLE_instantiate(interp, classobj, PREG(3));
else {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_NO_CLASS,
@@ -24003,7 +24296,7 @@
if (!PMC_IS_NULL(ns))
classobj = Parrot_oo_get_class(interp, ns);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, CONST(3)->u.key);
+ PREG(1) = VTABLE_instantiate(interp, classobj, CONST(3)->u.key);
else {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_NO_CLASS,
@@ -24024,7 +24317,7 @@
if (!PMC_IS_NULL(ns))
classobj = Parrot_oo_get_class(interp, ns);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, CONST(3)->u.key);
+ PREG(1) = VTABLE_instantiate(interp, classobj, CONST(3)->u.key);
else {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, cur_opcode + 4,
EXCEPTION_NO_CLASS,
@@ -24036,19 +24329,22 @@
opcode_t *
Parrot_typeof_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_name(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_name(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_typeof_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_class(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_class(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_get_repr_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_get_repr(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_get_repr(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24056,7 +24352,7 @@
Parrot_find_method_p_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
opcode_t * const resume = cur_opcode + 4;
- PREG(1)= VTABLE_find_method(interp, PREG(2), SREG(3));
+ PREG(1) = VTABLE_find_method(interp, PREG(2), SREG(3));
if (PMC_IS_NULL(PREG(1)) || !VTABLE_defined(interp, PREG(1))) {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, resume,
EXCEPTION_METHOD_NOT_FOUND,
@@ -24071,7 +24367,7 @@
Parrot_find_method_p_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
opcode_t * const resume = cur_opcode + 4;
- PREG(1)= VTABLE_find_method(interp, PREG(2), CONST(3)->u.string);
+ PREG(1) = VTABLE_find_method(interp, PREG(2), CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1)) || !VTABLE_defined(interp, PREG(1))) {
opcode_t * const dest = Parrot_ex_throw_from_op_args(interp, resume,
EXCEPTION_METHOD_NOT_FOUND,
@@ -24084,55 +24380,64 @@
opcode_t *
Parrot_defined_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_defined_i_p_ki(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed_int(interp, PREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_defined_i_p_kic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed_int(interp, PREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_defined_i_p_k(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_defined_i_p_kc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_defined_keyed(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_exists_i_p_ki(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_exists_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_exists_keyed_int(interp, PREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_exists_i_p_kic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_exists_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0 : VTABLE_exists_keyed_int(interp, PREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_exists_i_p_k(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0: VTABLE_exists_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0: VTABLE_exists_keyed(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_exists_i_p_kc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= PMC_IS_NULL(PREG(2)) ? 0: VTABLE_exists_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = PMC_IS_NULL(PREG(2)) ? 0: VTABLE_exists_keyed(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
@@ -24166,7 +24471,8 @@
opcode_t *
Parrot_elements_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_elements(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_elements(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24221,25 +24527,29 @@
opcode_t *
Parrot_pop_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_pop_integer(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_pop_integer(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_pop_n_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_pop_float(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_pop_float(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_pop_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_pop_string(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_pop_string(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_pop_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_pop_pmc(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_pop_pmc(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24294,25 +24604,29 @@
opcode_t *
Parrot_shift_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_shift_integer(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_shift_integer(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_shift_n_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_shift_float(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_shift_float(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_shift_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_shift_string(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_shift_string(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_shift_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_shift_pmc(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_shift_pmc(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24360,13 +24674,15 @@
opcode_t *
Parrot_getprop_p_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_getprop(interp, PREG(3), SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_getprop(interp, PREG(3), SREG(2));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_getprop_p_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_getprop(interp, PREG(3), CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_getprop(interp, PREG(3), CONST(2)->u.string);
return (opcode_t *)cur_opcode + 4;}
@@ -24386,25 +24702,29 @@
opcode_t *
Parrot_prophash_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_getprops(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_getprops(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_freeze_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_freeze(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_freeze(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_thaw_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_thaw(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_thaw(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_thaw_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_thaw(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_thaw(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
@@ -24438,25 +24758,29 @@
opcode_t *
Parrot_find_multi_p_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_mmd_find_multi_from_long_sig(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_mmd_find_multi_from_long_sig(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_find_multi_p_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_mmd_find_multi_from_long_sig(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_mmd_find_multi_from_long_sig(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_find_multi_p_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_mmd_find_multi_from_long_sig(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_mmd_find_multi_from_long_sig(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_find_multi_p_sc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_mmd_find_multi_from_long_sig(interp, CONST(2)->u.string, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_mmd_find_multi_from_long_sig(interp, CONST(2)->u.string, CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
@@ -24476,49 +24800,56 @@
opcode_t *
Parrot_box_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, PREG(1), IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_box_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, PREG(1), cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_box_p_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
VTABLE_set_number_native(interp, PREG(1), NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_box_p_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Float));
VTABLE_set_number_native(interp, PREG(1), CONST(2)->u.number);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_box_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_String));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_String));
VTABLE_set_string_native(interp, PREG(1), SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_box_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_String));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_String));
VTABLE_set_string_native(interp, PREG(1), CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_iter_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_iter(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_iter(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24538,7 +24869,9 @@
opcode_t *
Parrot_clone_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= STRING_IS_NULL(SREG(2))
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ /* cloning a NULL STRING produces an empty STRING; TT #964 */
+ SREG(1) = STRING_IS_NULL(SREG(2))
? Parrot_str_new(interp, NULL, 0)
: SREG(2);
@@ -24546,7 +24879,9 @@
opcode_t *
Parrot_clone_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= STRING_IS_NULL(CONST(2)->u.string)
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ /* cloning a NULL STRING produces an empty STRING; TT #964 */
+ SREG(1) = STRING_IS_NULL(CONST(2)->u.string)
? Parrot_str_new(interp, NULL, 0)
: CONST(2)->u.string;
@@ -24554,133 +24889,155 @@
opcode_t *
Parrot_set_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_i_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (INTVAL)(NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (INTVAL)(NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_i_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (INTVAL)(CONST(2)->u.number);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (INTVAL)(CONST(2)->u.number);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_to_int(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_to_int(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_to_int(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_to_int(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= NREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = NREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= CONST(2)->u.number;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = CONST(2)->u.number;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= (FLOATVAL)IREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = (FLOATVAL)IREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= (FLOATVAL)cur_opcode[2];
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = (FLOATVAL)cur_opcode[2];
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= Parrot_str_to_num(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = Parrot_str_to_num(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= Parrot_str_to_num(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = Parrot_str_to_num(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_n_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_get_number(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_get_number(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_get_string(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_get_string(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= SREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = SREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= CONST(2)->u.string;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = CONST(2)->u.string;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_from_int(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_from_int(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_from_int(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_from_int(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_from_num(interp, NREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_from_num(interp, NREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_s_nc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_from_num(interp, CONST(2)->u.number);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_from_num(interp, CONST(2)->u.number);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= CONST(2)->u.key;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = CONST(2)->u.key;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_set_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= PREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = PREG(2);
return (opcode_t *)cur_opcode + 3;}
@@ -24728,7 +25085,8 @@
opcode_t *
Parrot_set_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_get_integer(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_get_integer(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24783,13 +25141,15 @@
opcode_t *
Parrot_assign_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= SREG(2);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = SREG(2);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_assign_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= CONST(2)->u.string;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = CONST(2)->u.string;
return (opcode_t *)cur_opcode + 3;}
@@ -24802,7 +25162,8 @@
opcode_t *
Parrot_deref_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
@@ -24906,49 +25267,57 @@
opcode_t *
Parrot_set_i_p_ki(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_get_integer_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_get_integer_keyed_int(interp, PREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_i_p_kic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_get_integer_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_get_integer_keyed_int(interp, PREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_n_p_ki(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_get_number_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_get_number_keyed_int(interp, PREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_n_p_kic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_get_number_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_get_number_keyed_int(interp, PREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_s_p_ki(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_get_string_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_get_string_keyed_int(interp, PREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_s_p_kic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_get_string_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_get_string_keyed_int(interp, PREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_p_p_ki(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_p_p_kic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
@@ -25052,67 +25421,78 @@
opcode_t *
Parrot_set_i_p_k(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_get_integer_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_get_integer_keyed(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_i_p_kc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= VTABLE_get_integer_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = VTABLE_get_integer_keyed(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_n_p_k(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_get_number_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_get_number_keyed(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_n_p_kc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= VTABLE_get_number_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = VTABLE_get_number_keyed(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_s_p_k(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_get_string_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_get_string_keyed(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_s_p_kc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_get_string_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_get_string_keyed(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_p_p_k(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_set_p_p_kc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_clone_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_clone(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_clone(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_clone_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_clone_pmc(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_clone_pmc(interp, PREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_clone_p_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_clone_pmc(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_clone_pmc(interp, PREG(2), CONST(3)->u.key);
return (opcode_t *)cur_opcode + 4;}
@@ -25157,61 +25537,71 @@
opcode_t *
Parrot_null_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= STRINGNULL;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = STRINGNULL;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_null_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = 0;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_null_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= PMCNULL;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = PMCNULL;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_null_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= 0;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = 0;
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_ord_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= string_ord(interp, SREG(2), 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = string_ord(interp, SREG(2), 0);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_ord_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= string_ord(interp, CONST(2)->u.string, 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = string_ord(interp, CONST(2)->u.string, 0);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_ord_i_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= string_ord(interp, SREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = string_ord(interp, SREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_ord_i_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= string_ord(interp, CONST(2)->u.string, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = string_ord(interp, CONST(2)->u.string, IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_ord_i_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= string_ord(interp, SREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = string_ord(interp, SREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_ord_i_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= string_ord(interp, CONST(2)->u.string, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = string_ord(interp, CONST(2)->u.string, cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
@@ -25219,7 +25609,7 @@
Parrot_chr_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
STRING * const s = string_chr(interp, (UINTVAL)IREG(2));
- SREG(1)= s;
+ SREG(1) = s;
return (opcode_t *)cur_opcode + 3;}
@@ -25227,43 +25617,49 @@
Parrot_chr_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
STRING * const s = string_chr(interp, (UINTVAL)cur_opcode[2]);
- SREG(1)= s;
+ SREG(1) = s;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_chopn_s_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_chopn(interp, SREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_chopn(interp, SREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_chopn_s_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_chopn(interp, CONST(2)->u.string, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_chopn(interp, CONST(2)->u.string, IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_chopn_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_chopn(interp, SREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_chopn(interp, SREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_chopn_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_chopn(interp, CONST(2)->u.string, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_chopn(interp, CONST(2)->u.string, cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_concat_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_concat(interp, SREG(1), SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_concat(interp, SREG(1), SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_concat_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_concat(interp, SREG(1), CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_concat(interp, SREG(1), CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
@@ -25290,115 +25686,121 @@
opcode_t *
Parrot_concat_s_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_concat(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_concat(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_concat_s_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_concat(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_concat(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_concat_s_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_concat(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_concat(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_concat_p_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_concatenate_str(interp, PREG(2), SREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_concatenate_str(interp, PREG(2), SREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_concat_p_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_concatenate_str(interp, PREG(2), CONST(3)->u.string, PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_concatenate_str(interp, PREG(2), CONST(3)->u.string, PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_concat_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_concatenate(interp, PREG(2), PREG(3), PREG(1));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_concatenate(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_repeat_s_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(3)< 0) {
+ if (IREG(3) < 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
EXCEPTION_NEG_REPEAT,
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- SREG(1)= Parrot_str_repeat(interp, SREG(2), (UINTVAL)IREG(3));
+ SREG(1) = Parrot_str_repeat(interp, SREG(2), (UINTVAL)IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_repeat_s_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(3)< 0) {
+ if (IREG(3) < 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
EXCEPTION_NEG_REPEAT,
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- SREG(1)= Parrot_str_repeat(interp, CONST(2)->u.string, (UINTVAL)IREG(3));
+ SREG(1) = Parrot_str_repeat(interp, CONST(2)->u.string, (UINTVAL)IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_repeat_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[3]< 0) {
+ if (cur_opcode[3] < 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
EXCEPTION_NEG_REPEAT,
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- SREG(1)= Parrot_str_repeat(interp, SREG(2), (UINTVAL)cur_opcode[3]);
+ SREG(1) = Parrot_str_repeat(interp, SREG(2), (UINTVAL)cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_repeat_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[3]< 0) {
+ if (cur_opcode[3] < 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
EXCEPTION_NEG_REPEAT,
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- SREG(1)= Parrot_str_repeat(interp, CONST(2)->u.string, (UINTVAL)cur_opcode[3]);
+ SREG(1) = Parrot_str_repeat(interp, CONST(2)->u.string, (UINTVAL)cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_repeat_p_p_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (IREG(3)< 0) {
+ if (IREG(3) < 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
EXCEPTION_NEG_REPEAT,
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- PREG(1)= VTABLE_repeat_int(interp, PREG(2), IREG(3), PREG(1));
+ PREG(1) = VTABLE_repeat_int(interp, PREG(2), IREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_repeat_p_p_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (cur_opcode[3]< 0) {
+ if (cur_opcode[3] < 0) {
opcode_t *handler = Parrot_ex_throw_from_op_args(interp, NULL,
EXCEPTION_NEG_REPEAT,
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- PREG(1)= VTABLE_repeat_int(interp, PREG(2), cur_opcode[3], PREG(1));
+ PREG(1) = VTABLE_repeat_int(interp, PREG(2), cur_opcode[3], PREG(1));
return (opcode_t *)cur_opcode + 4;}
@@ -25411,7 +25813,7 @@
"Cannot repeat with negative arg");
return (opcode_t *)handler;
}
- PREG(1)= VTABLE_repeat(interp, PREG(2), PREG(3), PREG(1));
+ PREG(1) = VTABLE_repeat(interp, PREG(2), PREG(3), PREG(1));
return (opcode_t *)cur_opcode + 4;}
@@ -25438,25 +25840,29 @@
opcode_t *
Parrot_length_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_length(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_length(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_length_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_length(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_length(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_bytelength_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_byte_length(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_byte_length(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_bytelength_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_byte_length(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_byte_length(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
@@ -25478,7 +25884,7 @@
Parrot_substr_s_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL len = Parrot_str_byte_length(interp, SREG(2));
- SREG(1)= Parrot_str_substr(interp, SREG(2), IREG(3), len);
+ SREG(1) = Parrot_str_substr(interp, SREG(2), IREG(3), len);
return (opcode_t *)cur_opcode + 4;}
@@ -25486,7 +25892,7 @@
Parrot_substr_s_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL len = Parrot_str_byte_length(interp, CONST(2)->u.string);
- SREG(1)= Parrot_str_substr(interp, CONST(2)->u.string, IREG(3), len);
+ SREG(1) = Parrot_str_substr(interp, CONST(2)->u.string, IREG(3), len);
return (opcode_t *)cur_opcode + 4;}
@@ -25494,7 +25900,7 @@
Parrot_substr_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL len = Parrot_str_byte_length(interp, SREG(2));
- SREG(1)= Parrot_str_substr(interp, SREG(2), cur_opcode[3], len);
+ SREG(1) = Parrot_str_substr(interp, SREG(2), cur_opcode[3], len);
return (opcode_t *)cur_opcode + 4;}
@@ -25502,259 +25908,301 @@
Parrot_substr_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const INTVAL len = Parrot_str_byte_length(interp, CONST(2)->u.string);
- SREG(1)= Parrot_str_substr(interp, CONST(2)->u.string, cur_opcode[3], len);
+ SREG(1) = Parrot_str_substr(interp, CONST(2)->u.string, cur_opcode[3], len);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_substr_s_s_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, SREG(2), IREG(3), IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, SREG(2), IREG(3), IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_sc_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, CONST(2)->u.string, IREG(3), IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, CONST(2)->u.string, IREG(3), IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_s_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, SREG(2), cur_opcode[3], IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, SREG(2), cur_opcode[3], IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_sc_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, CONST(2)->u.string, cur_opcode[3], IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, CONST(2)->u.string, cur_opcode[3], IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_s_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, SREG(2), IREG(3), cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, SREG(2), IREG(3), cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_sc_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, CONST(2)->u.string, IREG(3), cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, CONST(2)->u.string, IREG(3), cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_s_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, SREG(2), cur_opcode[3], cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, SREG(2), cur_opcode[3], cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_sc_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_substr(interp, CONST(2)->u.string, cur_opcode[3], cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_substr(interp, CONST(2)->u.string, cur_opcode[3], cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_p_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_substr_str(interp, PREG(2), IREG(3), IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_substr_str(interp, PREG(2), IREG(3), IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_p_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_substr_str(interp, PREG(2), cur_opcode[3], IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_substr_str(interp, PREG(2), cur_opcode[3], IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_p_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_substr_str(interp, PREG(2), IREG(3), cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_substr_str(interp, PREG(2), IREG(3), cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_substr_s_p_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= VTABLE_substr_str(interp, PREG(2), cur_opcode[3], cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = VTABLE_substr_str(interp, PREG(2), cur_opcode[3], cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_replace_s_s_i_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), IREG(3), IREG(4), SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), IREG(3), IREG(4), SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_i_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), IREG(4), SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), IREG(4), SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_ic_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), cur_opcode[3], IREG(4), SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), cur_opcode[3], IREG(4), SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_ic_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], IREG(4), SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], IREG(4), SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_i_ic_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), IREG(3), cur_opcode[4], SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), IREG(3), cur_opcode[4], SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_i_ic_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), cur_opcode[4], SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), cur_opcode[4], SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_ic_ic_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), cur_opcode[3], cur_opcode[4], SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), cur_opcode[3], cur_opcode[4], SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_ic_ic_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], cur_opcode[4], SREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], cur_opcode[4], SREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_i_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), IREG(3), IREG(4), CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), IREG(3), IREG(4), CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_i_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), IREG(4), CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), IREG(4), CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_ic_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), cur_opcode[3], IREG(4), CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), cur_opcode[3], IREG(4), CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_ic_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], IREG(4), CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], IREG(4), CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_i_ic_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), IREG(3), cur_opcode[4], CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), IREG(3), cur_opcode[4], CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_i_ic_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), cur_opcode[4], CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, IREG(3), cur_opcode[4], CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_s_ic_ic_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, SREG(2), cur_opcode[3], cur_opcode[4], CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, SREG(2), cur_opcode[3], cur_opcode[4], CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_replace_s_sc_ic_ic_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], cur_opcode[4], CONST(5)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_replace(interp, CONST(2)->u.string, cur_opcode[3], cur_opcode[4], CONST(5)->u.string);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_index_i_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (SREG(2)&& SREG(3)) ? Parrot_str_find_index(interp, SREG(2), SREG(3), 0) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (SREG(2) && SREG(3)) ? Parrot_str_find_index(interp, SREG(2), SREG(3), 0) : -1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_index_i_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (CONST(2)->u.string&& SREG(3)) ? Parrot_str_find_index(interp, CONST(2)->u.string, SREG(3), 0) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (CONST(2)->u.string && SREG(3)) ? Parrot_str_find_index(interp, CONST(2)->u.string, SREG(3), 0) : -1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_index_i_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (SREG(2)&& CONST(3)->u.string) ? Parrot_str_find_index(interp, SREG(2), CONST(3)->u.string, 0) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (SREG(2) && CONST(3)->u.string) ? Parrot_str_find_index(interp, SREG(2), CONST(3)->u.string, 0) : -1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_index_i_sc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (CONST(2)->u.string&& CONST(3)->u.string) ? Parrot_str_find_index(interp, CONST(2)->u.string, CONST(3)->u.string, 0) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (CONST(2)->u.string && CONST(3)->u.string) ? Parrot_str_find_index(interp, CONST(2)->u.string, CONST(3)->u.string, 0) : -1;
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_index_i_s_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (SREG(2)&& SREG(3)) ? Parrot_str_find_index(interp, SREG(2), SREG(3), IREG(4)) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (SREG(2) && SREG(3)) ? Parrot_str_find_index(interp, SREG(2), SREG(3), IREG(4)) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_sc_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (CONST(2)->u.string&& SREG(3)) ? Parrot_str_find_index(interp, CONST(2)->u.string, SREG(3), IREG(4)) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (CONST(2)->u.string && SREG(3)) ? Parrot_str_find_index(interp, CONST(2)->u.string, SREG(3), IREG(4)) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_s_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (SREG(2)&& CONST(3)->u.string) ? Parrot_str_find_index(interp, SREG(2), CONST(3)->u.string, IREG(4)) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (SREG(2) && CONST(3)->u.string) ? Parrot_str_find_index(interp, SREG(2), CONST(3)->u.string, IREG(4)) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_sc_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (CONST(2)->u.string&& CONST(3)->u.string) ? Parrot_str_find_index(interp, CONST(2)->u.string, CONST(3)->u.string, IREG(4)) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (CONST(2)->u.string && CONST(3)->u.string) ? Parrot_str_find_index(interp, CONST(2)->u.string, CONST(3)->u.string, IREG(4)) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (SREG(2)&& SREG(3)) ? Parrot_str_find_index(interp, SREG(2), SREG(3), cur_opcode[4]) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (SREG(2) && SREG(3)) ? Parrot_str_find_index(interp, SREG(2), SREG(3), cur_opcode[4]) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_sc_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (CONST(2)->u.string&& SREG(3)) ? Parrot_str_find_index(interp, CONST(2)->u.string, SREG(3), cur_opcode[4]) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (CONST(2)->u.string && SREG(3)) ? Parrot_str_find_index(interp, CONST(2)->u.string, SREG(3), cur_opcode[4]) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (SREG(2)&& CONST(3)->u.string) ? Parrot_str_find_index(interp, SREG(2), CONST(3)->u.string, cur_opcode[4]) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (SREG(2) && CONST(3)->u.string) ? Parrot_str_find_index(interp, SREG(2), CONST(3)->u.string, cur_opcode[4]) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_index_i_sc_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= (CONST(2)->u.string&& CONST(3)->u.string) ? Parrot_str_find_index(interp, CONST(2)->u.string, CONST(3)->u.string, cur_opcode[4]) : -1;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = (CONST(2)->u.string && CONST(3)->u.string) ? Parrot_str_find_index(interp, CONST(2)->u.string, CONST(3)->u.string, cur_opcode[4]) : -1;
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_sprintf_s_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)=Parrot_psprintf(interp, SREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1)=Parrot_psprintf(interp, SREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_sprintf_s_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)=Parrot_psprintf(interp, CONST(2)->u.string, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1)=Parrot_psprintf(interp, CONST(2)->u.string, PREG(3));
return (opcode_t *)cur_opcode + 4;}
@@ -25768,46 +26216,49 @@
opcode_t *
Parrot_new_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_new_noinit(interp, enum_stringrep_one, 0);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_new_noinit(interp, enum_stringrep_one, 0);
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_new_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_new_noinit(interp, enum_stringrep_one, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_new_noinit(interp, enum_stringrep_one, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_new_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_new_noinit(interp, enum_stringrep_one, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_new_noinit(interp, enum_stringrep_one, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_stringinfo_i_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(2)== NULL)
- IREG(1)= 0;
+ if (SREG(2) == NULL)
+ IREG(1) = 0;
else {
switch (IREG(3)) {
case STRINGINFO_HEADER:
- IREG(1)= PTR2UINTVAL(SREG(2));
+ IREG(1) = PTR2UINTVAL(SREG(2));
break;
case STRINGINFO_STRSTART:
- IREG(1)= PTR2UINTVAL(SREG(2)->strstart);
+ IREG(1) = PTR2UINTVAL(SREG(2)->strstart);
break;
case STRINGINFO_BUFLEN:
- IREG(1)= Buffer_buflen(SREG(2));
+ IREG(1) = Buffer_buflen(SREG(2));
break;
case STRINGINFO_FLAGS:
- IREG(1)= PObj_get_FLAGS(SREG(2));
+ IREG(1) = PObj_get_FLAGS(SREG(2));
break;
case STRINGINFO_BUFUSED:
- IREG(1)= SREG(2)->bufused;
+ IREG(1) = SREG(2)->bufused;
break;
case STRINGINFO_STRLEN:
- IREG(1)= SREG(2)->strlen;
+ IREG(1) = SREG(2)->strlen;
break;
default:
{
@@ -25824,27 +26275,27 @@
opcode_t *
Parrot_stringinfo_i_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(2)->u.string== NULL)
- IREG(1)= 0;
+ if (CONST(2)->u.string == NULL)
+ IREG(1) = 0;
else {
switch (IREG(3)) {
case STRINGINFO_HEADER:
- IREG(1)= PTR2UINTVAL(CONST(2)->u.string);
+ IREG(1) = PTR2UINTVAL(CONST(2)->u.string);
break;
case STRINGINFO_STRSTART:
- IREG(1)= PTR2UINTVAL(CONST(2)->u.string->strstart);
+ IREG(1) = PTR2UINTVAL(CONST(2)->u.string->strstart);
break;
case STRINGINFO_BUFLEN:
- IREG(1)= Buffer_buflen(CONST(2)->u.string);
+ IREG(1) = Buffer_buflen(CONST(2)->u.string);
break;
case STRINGINFO_FLAGS:
- IREG(1)= PObj_get_FLAGS(CONST(2)->u.string);
+ IREG(1) = PObj_get_FLAGS(CONST(2)->u.string);
break;
case STRINGINFO_BUFUSED:
- IREG(1)= CONST(2)->u.string->bufused;
+ IREG(1) = CONST(2)->u.string->bufused;
break;
case STRINGINFO_STRLEN:
- IREG(1)= CONST(2)->u.string->strlen;
+ IREG(1) = CONST(2)->u.string->strlen;
break;
default:
{
@@ -25861,27 +26312,27 @@
opcode_t *
Parrot_stringinfo_i_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (SREG(2)== NULL)
- IREG(1)= 0;
+ if (SREG(2) == NULL)
+ IREG(1) = 0;
else {
switch (cur_opcode[3]) {
case STRINGINFO_HEADER:
- IREG(1)= PTR2UINTVAL(SREG(2));
+ IREG(1) = PTR2UINTVAL(SREG(2));
break;
case STRINGINFO_STRSTART:
- IREG(1)= PTR2UINTVAL(SREG(2)->strstart);
+ IREG(1) = PTR2UINTVAL(SREG(2)->strstart);
break;
case STRINGINFO_BUFLEN:
- IREG(1)= Buffer_buflen(SREG(2));
+ IREG(1) = Buffer_buflen(SREG(2));
break;
case STRINGINFO_FLAGS:
- IREG(1)= PObj_get_FLAGS(SREG(2));
+ IREG(1) = PObj_get_FLAGS(SREG(2));
break;
case STRINGINFO_BUFUSED:
- IREG(1)= SREG(2)->bufused;
+ IREG(1) = SREG(2)->bufused;
break;
case STRINGINFO_STRLEN:
- IREG(1)= SREG(2)->strlen;
+ IREG(1) = SREG(2)->strlen;
break;
default:
{
@@ -25898,27 +26349,27 @@
opcode_t *
Parrot_stringinfo_i_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
- if (CONST(2)->u.string== NULL)
- IREG(1)= 0;
+ if (CONST(2)->u.string == NULL)
+ IREG(1) = 0;
else {
switch (cur_opcode[3]) {
case STRINGINFO_HEADER:
- IREG(1)= PTR2UINTVAL(CONST(2)->u.string);
+ IREG(1) = PTR2UINTVAL(CONST(2)->u.string);
break;
case STRINGINFO_STRSTART:
- IREG(1)= PTR2UINTVAL(CONST(2)->u.string->strstart);
+ IREG(1) = PTR2UINTVAL(CONST(2)->u.string->strstart);
break;
case STRINGINFO_BUFLEN:
- IREG(1)= Buffer_buflen(CONST(2)->u.string);
+ IREG(1) = Buffer_buflen(CONST(2)->u.string);
break;
case STRINGINFO_FLAGS:
- IREG(1)= PObj_get_FLAGS(CONST(2)->u.string);
+ IREG(1) = PObj_get_FLAGS(CONST(2)->u.string);
break;
case STRINGINFO_BUFUSED:
- IREG(1)= CONST(2)->u.string->bufused;
+ IREG(1) = CONST(2)->u.string->bufused;
break;
case STRINGINFO_STRLEN:
- IREG(1)= CONST(2)->u.string->strlen;
+ IREG(1) = CONST(2)->u.string->strlen;
break;
default:
{
@@ -25934,97 +26385,113 @@
opcode_t *
Parrot_upcase_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_upcase(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_upcase(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_upcase_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_upcase(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_upcase(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_downcase_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_downcase(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_downcase(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_downcase_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_downcase(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_downcase(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_titlecase_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_titlecase(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_titlecase(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_titlecase_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_titlecase(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_titlecase(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_join_s_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_join(interp, SREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_join(interp, SREG(2), PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_join_s_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_join(interp, CONST(2)->u.string, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_join(interp, CONST(2)->u.string, PREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_split_p_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_str_split(interp, SREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_str_split(interp, SREG(2), SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_split_p_sc_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_str_split(interp, CONST(2)->u.string, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_str_split(interp, CONST(2)->u.string, SREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_split_p_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_str_split(interp, SREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_str_split(interp, SREG(2), CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_split_p_sc_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= Parrot_str_split(interp, CONST(2)->u.string, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = Parrot_str_split(interp, CONST(2)->u.string, CONST(3)->u.string);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_charset_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_charset_number_of_str(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_charset_number_of_str(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_charset_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_charset_number_of_str(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_charset_number_of_str(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_charsetname_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_charset_name(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_charset_name(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_charsetname_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_charset_name(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_charset_name(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
@@ -26038,7 +26505,7 @@
"charset '%Ss' not found", SREG(2));
return (opcode_t *)handler;
}
- IREG(1)= n;
+ IREG(1) = n;
return (opcode_t *)cur_opcode + 3;}
@@ -26052,55 +26519,63 @@
"charset '%Ss' not found", CONST(2)->u.string);
return (opcode_t *)handler;
}
- IREG(1)= n;
+ IREG(1) = n;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_trans_charset_s_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_charset(interp, SREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_charset(interp, SREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_trans_charset_s_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_charset(interp, CONST(2)->u.string, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_charset(interp, CONST(2)->u.string, IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_trans_charset_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_charset(interp, SREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_charset(interp, SREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_trans_charset_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_charset(interp, CONST(2)->u.string, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_charset(interp, CONST(2)->u.string, cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_encoding_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_encoding_number_of_str(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_encoding_number_of_str(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_encoding_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_encoding_number_of_str(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_encoding_number_of_str(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_encodingname_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_encoding_name(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_encoding_name(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_encodingname_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_encoding_name(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_encoding_name(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
@@ -26114,7 +26589,7 @@
"encoding '%Ss' not found", SREG(2));
return (opcode_t *)handler;
}
- IREG(1)= n;
+ IREG(1) = n;
return (opcode_t *)cur_opcode + 3;}
@@ -26128,313 +26603,364 @@
"encoding '%Ss' not found", CONST(2)->u.string);
return (opcode_t *)handler;
}
- IREG(1)= n;
+ IREG(1) = n;
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_trans_encoding_s_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_encoding(interp, SREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_encoding(interp, SREG(2), IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_trans_encoding_s_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_encoding(interp, CONST(2)->u.string, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_encoding(interp, CONST(2)->u.string, IREG(3));
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_trans_encoding_s_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_encoding(interp, SREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_encoding(interp, SREG(2), cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_trans_encoding_s_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_change_encoding(interp, CONST(2)->u.string, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_change_encoding(interp, CONST(2)->u.string, cur_opcode[3]);
return (opcode_t *)cur_opcode + 4;}
opcode_t *
Parrot_is_cclass_i_i_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, IREG(2), SREG(3), IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, IREG(2), SREG(3), IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_ic_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, cur_opcode[2], SREG(3), IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, cur_opcode[2], SREG(3), IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_i_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_ic_sc_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4));
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_i_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, IREG(2), SREG(3), cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, IREG(2), SREG(3), cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_ic_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_i_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_is_cclass_i_ic_sc_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_is_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_is_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4]);
return (opcode_t *)cur_opcode + 5;}
opcode_t *
Parrot_find_cclass_i_i_s_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), SREG(3), IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), SREG(3), IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_s_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_sc_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_sc_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_s_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), SREG(3), cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), SREG(3), cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_s_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_sc_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_sc_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_s_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), SREG(3), IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), SREG(3), IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_s_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_sc_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_sc_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_s_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), SREG(3), cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), SREG(3), cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_s_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_i_sc_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_cclass_i_ic_sc_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_s_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_s_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_sc_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_sc_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_s_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_s_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_sc_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_sc_ic_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], IREG(5));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], IREG(5));
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_s_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_s_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_sc_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_sc_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, IREG(4), cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_s_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), SREG(3), cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_s_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], SREG(3), cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_i_sc_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, IREG(2), CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_find_not_cclass_i_ic_sc_ic_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_str_find_not_cclass(interp, cur_opcode[2], CONST(3)->u.string, cur_opcode[4], cur_opcode[5]);
return (opcode_t *)cur_opcode + 6;}
opcode_t *
Parrot_escape_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_escape(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_escape(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_compose_s_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_compose(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_compose(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_compose_s_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= Parrot_str_compose(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = Parrot_str_compose(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_spawnw_i_s(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_Run_OS_Command(interp, SREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_Run_OS_Command(interp, SREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_spawnw_i_sc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_Run_OS_Command(interp, CONST(2)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_Run_OS_Command(interp, CONST(2)->u.string);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_spawnw_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_Run_OS_Command_Argv(interp, PREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_Run_OS_Command_Argv(interp, PREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_err_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= errno;
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = errno;
return (opcode_t *)cur_opcode + 2;}
@@ -26442,7 +26968,7 @@
Parrot_err_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const char * const tmp = strerror(errno);
- SREG(1)= string_make(interp, tmp, strlen(tmp), "ascii", 0);
+ SREG(1) = string_make(interp, tmp, strlen(tmp), "ascii", 0);
return (opcode_t *)cur_opcode + 2;}
@@ -26450,7 +26976,7 @@
Parrot_err_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const char * const tmp = strerror(IREG(2));
- SREG(1)= string_make(interp, tmp, strlen(tmp), "ascii", 0);
+ SREG(1) = string_make(interp, tmp, strlen(tmp), "ascii", 0);
return (opcode_t *)cur_opcode + 3;}
@@ -26458,19 +26984,21 @@
Parrot_err_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
const char * const tmp = strerror(cur_opcode[2]);
- SREG(1)= string_make(interp, tmp, strlen(tmp), "ascii", 0);
+ SREG(1) = string_make(interp, tmp, strlen(tmp), "ascii", 0);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_time_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= Parrot_intval_time();
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = Parrot_intval_time();
return (opcode_t *)cur_opcode + 2;}
opcode_t *
Parrot_time_n(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);NREG(1)= Parrot_floatval_time();
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ NREG(1) = Parrot_floatval_time();
return (opcode_t *)cur_opcode + 2;}
@@ -26482,7 +27010,7 @@
char resultbuffer[26];
Parrot_gmtime_r(&t, &tm);
Parrot_asctime_r(&tm, resultbuffer);
- SREG(1)= Parrot_str_new(interp, resultbuffer, 25);
+ SREG(1) = Parrot_str_new(interp, resultbuffer, 25);
return (opcode_t *)cur_opcode + 3;}
@@ -26494,7 +27022,7 @@
char resultbuffer[26];
Parrot_gmtime_r(&t, &tm);
Parrot_asctime_r(&tm, resultbuffer);
- SREG(1)= Parrot_str_new(interp, resultbuffer, 25);
+ SREG(1) = Parrot_str_new(interp, resultbuffer, 25);
return (opcode_t *)cur_opcode + 3;}
@@ -26506,7 +27034,7 @@
char resultbuffer[26];
Parrot_localtime_r(&t, &tm);
Parrot_asctime_r(&tm, resultbuffer);
- SREG(1)= Parrot_str_new(interp, resultbuffer, 25);
+ SREG(1) = Parrot_str_new(interp, resultbuffer, 25);
return (opcode_t *)cur_opcode + 3;}
@@ -26518,7 +27046,7 @@
char resultbuffer[26];
Parrot_localtime_r(&t, &tm);
Parrot_asctime_r(&tm, resultbuffer);
- SREG(1)= Parrot_str_new(interp, resultbuffer, 25);
+ SREG(1) = Parrot_str_new(interp, resultbuffer, 25);
return (opcode_t *)cur_opcode + 3;}
@@ -26528,7 +27056,7 @@
struct tm tm;
const time_t t = (time_t) IREG(2);
Parrot_gmtime_r(&t, &tm);
- PREG(1)= tm_to_array(interp, &tm);
+ PREG(1) = tm_to_array(interp, &tm);
return (opcode_t *)cur_opcode + 3;}
@@ -26538,7 +27066,7 @@
struct tm tm;
const time_t t = (time_t) cur_opcode[2];
Parrot_gmtime_r(&t, &tm);
- PREG(1)= tm_to_array(interp, &tm);
+ PREG(1) = tm_to_array(interp, &tm);
return (opcode_t *)cur_opcode + 3;}
@@ -26548,7 +27076,7 @@
struct tm tm;
const time_t t = (time_t) IREG(2);
Parrot_localtime_r(&t, &tm);
- PREG(1)= tm_to_array(interp, &tm);
+ PREG(1) = tm_to_array(interp, &tm);
return (opcode_t *)cur_opcode + 3;}
@@ -26558,31 +27086,35 @@
struct tm tm;
const time_t t = (time_t) cur_opcode[2];
Parrot_localtime_r(&t, &tm);
- PREG(1)= tm_to_array(interp, &tm);
+ PREG(1) = tm_to_array(interp, &tm);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sysinfo_s_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= sysinfo_s(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = sysinfo_s(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sysinfo_s_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);SREG(1)= sysinfo_s(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ SREG(1) = sysinfo_s(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sysinfo_i_i(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= sysinfo_i(interp, IREG(2));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = sysinfo_i(interp, IREG(2));
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_sysinfo_i_ic(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);IREG(1)= sysinfo_i(interp, cur_opcode[2]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ IREG(1) = sysinfo_i(interp, cur_opcode[2]);
return (opcode_t *)cur_opcode + 3;}
@@ -26590,7 +27122,7 @@
Parrot_sleep_i(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
opcode_t *next = cur_opcode + 2;
- if (IREG(1)< 0) {
+ if (IREG(1) < 0) {
opcode_t * const handler = Parrot_ex_throw_from_op_args(interp, next,
EXCEPTION_NEG_SLEEP,
"Cannot go back in time");
@@ -26604,7 +27136,7 @@
Parrot_sleep_ic(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
opcode_t *next = cur_opcode + 2;
- if (cur_opcode[1]< 0) {
+ if (cur_opcode[1] < 0) {
opcode_t * const handler = Parrot_ex_throw_from_op_args(interp, next,
EXCEPTION_NEG_SLEEP,
"Cannot go back in time");
@@ -26618,7 +27150,7 @@
Parrot_sleep_n(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
opcode_t *next = cur_opcode + 2;
- if (NREG(1)< 0.0) {
+ if (NREG(1) < 0.0) {
opcode_t * const handler = Parrot_ex_throw_from_op_args(interp, next,
EXCEPTION_NEG_SLEEP,
"Cannot go back in time");
@@ -26632,7 +27164,7 @@
Parrot_sleep_nc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
opcode_t *next = cur_opcode + 2;
- if (CONST(1)->u.number< 0.0) {
+ if (CONST(1)->u.number < 0.0) {
opcode_t * const handler = Parrot_ex_throw_from_op_args(interp, next,
EXCEPTION_NEG_SLEEP,
"Cannot go back in time");
@@ -26735,7 +27267,7 @@
"Lexical '%Ss' not found", lex_name);
return (opcode_t *)handler;
}
- PREG(1)= result;
+ PREG(1) = result;
return (opcode_t *)cur_opcode + 3;}
@@ -26756,7 +27288,7 @@
"Lexical '%Ss' not found", lex_name);
return (opcode_t *)handler;
}
- PREG(1)= result;
+ PREG(1) = result;
return (opcode_t *)cur_opcode + 3;}
@@ -26774,7 +27306,7 @@
PMC_IS_NULL(lex_pad)
? PMCNULL
: VTABLE_get_pmc_keyed_str(interp, lex_pad, lex_name);
- PREG(1)= result;
+ PREG(1) = result;
return (opcode_t *)cur_opcode + 3;}
@@ -26792,7 +27324,7 @@
PMC_IS_NULL(lex_pad)
? PMCNULL
: VTABLE_get_pmc_keyed_str(interp, lex_pad, lex_name);
- PREG(1)= result;
+ PREG(1) = result;
return (opcode_t *)cur_opcode + 3;}
@@ -26813,7 +27345,7 @@
}
if (!result) result = PMCNULL;
}
- PREG(1)= result;
+ PREG(1) = result;
return (opcode_t *)cur_opcode + 3;}
@@ -26834,7 +27366,7 @@
}
if (!result) result = PMCNULL;
}
- PREG(1)= result;
+ PREG(1) = result;
return (opcode_t *)cur_opcode + 3;}
@@ -26842,7 +27374,7 @@
Parrot_get_namespace_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
- PREG(1)= cur_ns;
+ PREG(1) = cur_ns;
return (opcode_t *)cur_opcode + 2;}
@@ -26852,7 +27384,7 @@
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
PMC * const ns = Parrot_get_namespace_keyed(interp, cur_ns, PREG(2));
- PREG(1)= PMC_IS_NULL(ns) ? PMCNULL : ns;
+ PREG(1) = PMC_IS_NULL(ns) ? PMCNULL : ns;
return (opcode_t *)cur_opcode + 3;}
@@ -26862,7 +27394,7 @@
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
PMC * const ns = Parrot_get_namespace_keyed(interp, cur_ns, CONST(2)->u.key);
- PREG(1)= PMC_IS_NULL(ns) ? PMCNULL : ns;
+ PREG(1) = PMC_IS_NULL(ns) ? PMCNULL : ns;
return (opcode_t *)cur_opcode + 3;}
@@ -26870,7 +27402,7 @@
Parrot_get_hll_namespace_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
- PREG(1)= hll_ns;
+ PREG(1) = hll_ns;
return (opcode_t *)cur_opcode + 2;}
@@ -26879,10 +27411,10 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
if (PMC_IS_NULL(hll_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, hll_ns, PREG(2));
- PREG(1)= ns;
+ PREG(1) = ns;
}
return (opcode_t *)cur_opcode + 3;}
@@ -26892,10 +27424,10 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
if (PMC_IS_NULL(hll_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, hll_ns, CONST(2)->u.key);
- PREG(1)= ns;
+ PREG(1) = ns;
}
return (opcode_t *)cur_opcode + 3;}
@@ -26904,7 +27436,7 @@
Parrot_get_root_namespace_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
- PREG(1)= root_ns;
+ PREG(1) = root_ns;
return (opcode_t *)cur_opcode + 2;}
@@ -26913,10 +27445,10 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
if (PMC_IS_NULL(root_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, root_ns, PREG(2));
- PREG(1)= ns;
+ PREG(1) = ns;
}
return (opcode_t *)cur_opcode + 3;}
@@ -26926,10 +27458,10 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
if (PMC_IS_NULL(root_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, root_ns, CONST(2)->u.key);
- PREG(1)= ns;
+ PREG(1) = ns;
}
return (opcode_t *)cur_opcode + 3;}
@@ -26938,7 +27470,7 @@
Parrot_get_global_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
- PREG(1)= Parrot_find_global_op(interp, cur_ns, SREG(2), cur_opcode + 3);
+ PREG(1) = Parrot_find_global_op(interp, cur_ns, SREG(2), cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -26946,7 +27478,7 @@
Parrot_get_global_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
- PREG(1)= Parrot_find_global_op(interp, cur_ns, CONST(2)->u.string, cur_opcode + 3);
+ PREG(1) = Parrot_find_global_op(interp, cur_ns, CONST(2)->u.string, cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -26955,14 +27487,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
if (PMC_IS_NULL(cur_ns)) {
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, cur_ns, PREG(2));
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -26972,14 +27504,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
if (PMC_IS_NULL(cur_ns)) {
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, cur_ns, CONST(2)->u.key);
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -26989,14 +27521,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
if (PMC_IS_NULL(cur_ns)) {
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, cur_ns, PREG(2));
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27006,14 +27538,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const cur_ns = Parrot_pcc_get_namespace(interp, CURRENT_CONTEXT(interp));
if (PMC_IS_NULL(cur_ns)) {
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, cur_ns, CONST(2)->u.key);
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27022,7 +27554,7 @@
Parrot_get_hll_global_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
- PREG(1)= Parrot_find_global_op(interp, hll_ns, SREG(2), cur_opcode + 3);
+ PREG(1) = Parrot_find_global_op(interp, hll_ns, SREG(2), cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -27030,7 +27562,7 @@
Parrot_get_hll_global_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
- PREG(1)= Parrot_find_global_op(interp, hll_ns, CONST(2)->u.string, cur_opcode + 3);
+ PREG(1) = Parrot_find_global_op(interp, hll_ns, CONST(2)->u.string, cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -27039,14 +27571,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
if (PMC_IS_NULL(hll_ns)) {
- PREG(1)= hll_ns;
+ PREG(1) = hll_ns;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, hll_ns, PREG(2));
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27056,14 +27588,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
if (PMC_IS_NULL(hll_ns)) {
- PREG(1)= hll_ns;
+ PREG(1) = hll_ns;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, hll_ns, CONST(2)->u.key);
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27073,14 +27605,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
if (PMC_IS_NULL(hll_ns)) {
- PREG(1)= hll_ns;
+ PREG(1) = hll_ns;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, hll_ns, PREG(2));
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27090,14 +27622,14 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const hll_ns = Parrot_get_ctx_HLL_namespace(interp);
if (PMC_IS_NULL(hll_ns)) {
- PREG(1)= hll_ns;
+ PREG(1) = hll_ns;
}
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, hll_ns, CONST(2)->u.key);
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27106,7 +27638,7 @@
Parrot_get_root_global_p_s(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
- PREG(1)= Parrot_find_global_op(interp, root_ns, SREG(2), cur_opcode + 3);
+ PREG(1) = Parrot_find_global_op(interp, root_ns, SREG(2), cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -27114,7 +27646,7 @@
Parrot_get_root_global_p_sc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
- PREG(1)= Parrot_find_global_op(interp, root_ns, CONST(2)->u.string, cur_opcode + 3);
+ PREG(1) = Parrot_find_global_op(interp, root_ns, CONST(2)->u.string, cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -27123,13 +27655,13 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
if (PMC_IS_NULL(root_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, root_ns, PREG(2));
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27139,13 +27671,13 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
if (PMC_IS_NULL(root_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, root_ns, CONST(2)->u.key);
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, SREG(3), cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27155,13 +27687,13 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
if (PMC_IS_NULL(root_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, root_ns, PREG(2));
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27171,13 +27703,13 @@
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
PMC * const root_ns = interp->root_namespace;
if (PMC_IS_NULL(root_ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else {
PMC * const ns = Parrot_get_namespace_keyed(interp, root_ns, CONST(2)->u.key);
if (PMC_IS_NULL(ns))
- PREG(1)= PMCNULL;
+ PREG(1) = PMCNULL;
else
- PREG(1)= Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
+ PREG(1) = Parrot_find_global_op(interp, ns, CONST(3)->u.string, cur_opcode + 4);
}
return (opcode_t *)cur_opcode + 4;}
@@ -27360,7 +27892,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_find_name_op(interp, SREG(2), cur_opcode + 3);
+ PREG(1) = Parrot_find_name_op(interp, SREG(2), cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -27374,7 +27906,7 @@
return (opcode_t *)handler;
}
- PREG(1)= Parrot_find_name_op(interp, CONST(2)->u.string, cur_opcode + 3);
+ PREG(1) = Parrot_find_name_op(interp, CONST(2)->u.string, cur_opcode + 3);
return (opcode_t *)cur_opcode + 3;}
@@ -27391,7 +27923,7 @@
return (opcode_t *)handler;
}
- PREG(1)= sub;
+ PREG(1) = sub;
return (opcode_t *)cur_opcode + 3;}
@@ -27408,7 +27940,7 @@
return (opcode_t *)handler;
}
- PREG(1)= sub;
+ PREG(1) = sub;
return (opcode_t *)cur_opcode + 3;}
@@ -27435,17 +27967,18 @@
Parrot_get_label_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
void * const ptr = VTABLE_get_pointer(interp, PREG(2));
- IREG(1)= PTR2INTVAL(ptr);
+ IREG(1) = PTR2INTVAL(ptr);
return (opcode_t *)cur_opcode + 3;}
opcode_t *
Parrot_fetch_p_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27455,7 +27988,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27463,11 +27996,12 @@
opcode_t *
Parrot_fetch_p_pc_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27477,7 +28011,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27485,11 +28019,12 @@
opcode_t *
Parrot_fetch_p_p_pc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27499,7 +28034,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27507,11 +28042,12 @@
opcode_t *
Parrot_fetch_p_pc_pc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27521,7 +28057,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27529,11 +28065,12 @@
opcode_t *
Parrot_fetch_p_p_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27543,7 +28080,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27551,11 +28088,12 @@
opcode_t *
Parrot_fetch_p_pc_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27565,7 +28103,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27573,11 +28111,12 @@
opcode_t *
Parrot_fetch_p_p_pc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27587,7 +28126,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27595,11 +28134,12 @@
opcode_t *
Parrot_fetch_p_pc_pc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27609,7 +28149,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27617,11 +28157,12 @@
opcode_t *
Parrot_fetch_p_p_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27631,7 +28172,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27639,11 +28180,12 @@
opcode_t *
Parrot_fetch_p_pc_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27653,7 +28195,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27661,11 +28203,12 @@
opcode_t *
Parrot_fetch_p_p_ic_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27675,7 +28218,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27683,11 +28226,12 @@
opcode_t *
Parrot_fetch_p_pc_ic_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27697,7 +28241,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27705,11 +28249,12 @@
opcode_t *
Parrot_fetch_p_p_i_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27719,7 +28264,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27727,11 +28272,12 @@
opcode_t *
Parrot_fetch_p_pc_i_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27741,7 +28287,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27749,11 +28295,12 @@
opcode_t *
Parrot_fetch_p_p_ic_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27763,7 +28310,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27771,11 +28318,12 @@
opcode_t *
Parrot_fetch_p_pc_ic_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27785,7 +28333,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27793,11 +28341,12 @@
opcode_t *
Parrot_fetch_p_p_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27807,7 +28356,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27815,11 +28364,12 @@
opcode_t *
Parrot_fetch_p_pc_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27829,7 +28379,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27837,11 +28387,12 @@
opcode_t *
Parrot_fetch_p_p_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27851,7 +28402,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27859,11 +28410,12 @@
opcode_t *
Parrot_fetch_p_pc_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27873,7 +28425,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27881,11 +28433,12 @@
opcode_t *
Parrot_fetch_p_p_s_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27895,7 +28448,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27903,11 +28456,12 @@
opcode_t *
Parrot_fetch_p_pc_s_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27917,7 +28471,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27925,11 +28479,12 @@
opcode_t *
Parrot_fetch_p_p_sc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27939,7 +28494,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27947,11 +28502,12 @@
opcode_t *
Parrot_fetch_p_pc_sc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -27961,7 +28517,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
}
@@ -27969,13 +28525,14 @@
opcode_t *
Parrot_vivify_p_p_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -27985,7 +28542,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, PREG(2), PREG(3), PREG(1));
}
@@ -27994,13 +28551,14 @@
opcode_t *
Parrot_vivify_p_pc_p_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28010,7 +28568,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, CONST(2)->u.key, PREG(3), PREG(1));
}
@@ -28019,13 +28577,14 @@
opcode_t *
Parrot_vivify_p_p_pc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28035,7 +28594,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, PREG(2), CONST(3)->u.key, PREG(1));
}
@@ -28044,13 +28603,14 @@
opcode_t *
Parrot_vivify_p_pc_pc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28060,7 +28620,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key, PREG(1));
}
@@ -28069,13 +28629,14 @@
opcode_t *
Parrot_vivify_p_p_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28085,7 +28646,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, PREG(2), PREG(3), PREG(1));
}
@@ -28094,13 +28655,14 @@
opcode_t *
Parrot_vivify_p_pc_p_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, PREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28110,7 +28672,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, CONST(2)->u.key, PREG(3), PREG(1));
}
@@ -28119,13 +28681,14 @@
opcode_t *
Parrot_vivify_p_p_pc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, PREG(2), CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28135,7 +28698,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, PREG(2), CONST(3)->u.key, PREG(1));
}
@@ -28144,13 +28707,14 @@
opcode_t *
Parrot_vivify_p_pc_pc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28160,7 +28724,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed(interp, CONST(2)->u.key, CONST(3)->u.key, PREG(1));
}
@@ -28169,12 +28733,13 @@
opcode_t *
Parrot_vivify_p_p_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28184,7 +28749,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, PREG(2), IREG(3), PREG(1));
@@ -28194,12 +28759,13 @@
opcode_t *
Parrot_vivify_p_pc_i_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28209,7 +28775,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3), PREG(1));
@@ -28219,12 +28785,13 @@
opcode_t *
Parrot_vivify_p_p_ic_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28234,7 +28801,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, PREG(2), cur_opcode[3], PREG(1));
@@ -28244,12 +28811,13 @@
opcode_t *
Parrot_vivify_p_pc_ic_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28259,7 +28827,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3], PREG(1));
@@ -28269,12 +28837,13 @@
opcode_t *
Parrot_vivify_p_p_i_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28284,7 +28853,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, PREG(2), IREG(3), PREG(1));
@@ -28294,12 +28863,13 @@
opcode_t *
Parrot_vivify_p_pc_i_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28309,7 +28879,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, CONST(2)->u.key, IREG(3), PREG(1));
@@ -28319,12 +28889,13 @@
opcode_t *
Parrot_vivify_p_p_ic_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, PREG(2), cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28334,7 +28905,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, PREG(2), cur_opcode[3], PREG(1));
@@ -28344,12 +28915,13 @@
opcode_t *
Parrot_vivify_p_pc_ic_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3]);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28359,7 +28931,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_int(interp, CONST(2)->u.key, cur_opcode[3], PREG(1));
@@ -28369,12 +28941,13 @@
opcode_t *
Parrot_vivify_p_p_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28384,7 +28957,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, PREG(2), SREG(3), PREG(1));
@@ -28394,12 +28967,13 @@
opcode_t *
Parrot_vivify_p_pc_s_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28409,7 +28983,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3), PREG(1));
@@ -28419,12 +28993,13 @@
opcode_t *
Parrot_vivify_p_p_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28434,7 +29009,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string, PREG(1));
@@ -28444,12 +29019,13 @@
opcode_t *
Parrot_vivify_p_pc_sc_p(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, PREG(4));
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, PREG(4));
if (type <= 0) {
@@ -28459,7 +29035,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string, PREG(1));
@@ -28469,12 +29045,13 @@
opcode_t *
Parrot_vivify_p_p_s_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28484,7 +29061,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, PREG(2), SREG(3), PREG(1));
@@ -28494,12 +29071,13 @@
opcode_t *
Parrot_vivify_p_pc_s_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3));
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28509,7 +29087,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, CONST(2)->u.key, SREG(3), PREG(1));
@@ -28519,12 +29097,13 @@
opcode_t *
Parrot_vivify_p_p_sc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28534,7 +29113,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, PREG(2), CONST(3)->u.string, PREG(1));
@@ -28544,12 +29123,13 @@
opcode_t *
Parrot_vivify_p_pc_sc_pc(opcode_t *cur_opcode, PARROT_INTERP) {
- const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);PREG(1)= VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
+ const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
+ PREG(1) = VTABLE_get_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string);
if (PMC_IS_NULL(PREG(1))) {
PMC * const classobj = Parrot_oo_get_class(interp, CONST(4)->u.key);
if (!PMC_IS_NULL(classobj))
- PREG(1)= VTABLE_instantiate(interp, classobj, PMCNULL);
+ PREG(1) = VTABLE_instantiate(interp, classobj, PMCNULL);
else {
const INTVAL type = Parrot_pmc_get_type(interp, CONST(4)->u.key);
if (type <= 0) {
@@ -28559,7 +29139,7 @@
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new(interp, type);
+ PREG(1) = Parrot_pmc_new(interp, type);
}
VTABLE_set_pmc_keyed_str(interp, CONST(2)->u.key, CONST(3)->u.string, PREG(1));
@@ -28578,7 +29158,7 @@
if (!PMC_IS_NULL(_class)) {
PMC *initial = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, IREG(3));
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
@@ -28588,7 +29168,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init_int(interp, type, IREG(3));
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, IREG(3));
}
return (opcode_t *)cur_opcode + 4;}
@@ -28604,7 +29184,7 @@
if (!PMC_IS_NULL(_class)) {
PMC *initial = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, IREG(3));
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
@@ -28614,7 +29194,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init_int(interp, type, IREG(3));
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, IREG(3));
}
return (opcode_t *)cur_opcode + 4;}
@@ -28630,7 +29210,7 @@
if (!PMC_IS_NULL(_class)) {
PMC *initial = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, cur_opcode[3]);
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
@@ -28640,7 +29220,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
}
return (opcode_t *)cur_opcode + 4;}
@@ -28656,7 +29236,7 @@
if (!PMC_IS_NULL(_class)) {
PMC *initial = Parrot_pmc_new(interp, Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, cur_opcode[3]);
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
else {
const INTVAL type = Parrot_pmc_get_type_str(interp, name);
@@ -28666,7 +29246,7 @@
"Class '%Ss' not found", name);
return (opcode_t *)dest;
}
- PREG(1)= Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
}
return (opcode_t *)cur_opcode + 4;}
@@ -28686,13 +29266,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, IREG(3));
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, IREG(3));
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, IREG(3));
/* it's a typo */
else {
@@ -28719,13 +29299,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, IREG(3));
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, IREG(3));
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, IREG(3));
/* it's a typo */
else {
@@ -28752,13 +29332,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, cur_opcode[3]);
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
/* it's a typo */
else {
@@ -28785,13 +29365,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, cur_opcode[3]);
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
/* it's a typo */
else {
@@ -28820,13 +29400,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, IREG(3));
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, IREG(3));
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, IREG(3));
/* it's a typo */
else {
@@ -28855,13 +29435,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, IREG(3));
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, IREG(3));
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, IREG(3));
/* it's a typo */
else {
@@ -28890,13 +29470,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, cur_opcode[3]);
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
/* it's a typo */
else {
@@ -28925,13 +29505,13 @@
PMC *initial = Parrot_pmc_new(interp,
Parrot_get_ctx_HLL_type(interp, enum_class_Integer));
VTABLE_set_integer_native(interp, initial, cur_opcode[3]);
- PREG(1)= VTABLE_instantiate(interp, _class, initial);
+ PREG(1) = VTABLE_instantiate(interp, _class, initial);
}
}
/* if it's a core PMC */
else if (type > enum_class_default)
- PREG(1)= Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
+ PREG(1) = Parrot_pmc_new_init_int(interp, type, cur_opcode[3]);
/* it's a typo */
else {
@@ -28951,7 +29531,7 @@
char * const cstr = Parrot_str_to_cstring(interp, SREG(2));
UChar32 codepoint = u_charFromName(U_EXTENDED_CHAR_NAME, cstr, &err);
Parrot_str_free_cstring(cstr);
- IREG(1)= U_SUCCESS(err) ? (INTVAL) codepoint : -1;
+ IREG(1) = U_SUCCESS(err) ? (INTVAL) codepoint : -1;
#else
opcode_t * const dest = cur_opcode + 3;
Parrot_ex_throw_from_op_args(interp, dest, EXCEPTION_LIBRARY_ERROR,
@@ -28968,7 +29548,7 @@
char * const cstr = Parrot_str_to_cstring(interp, CONST(2)->u.string);
UChar32 codepoint = u_charFromName(U_EXTENDED_CHAR_NAME, cstr, &err);
Parrot_str_free_cstring(cstr);
- IREG(1)= U_SUCCESS(err) ? (INTVAL) codepoint : -1;
+ IREG(1) = U_SUCCESS(err) ? (INTVAL) codepoint : -1;
#else
opcode_t * const dest = cur_opcode + 3;
Parrot_ex_throw_from_op_args(interp, dest, EXCEPTION_LIBRARY_ERROR,
More information about the parrot-commits
mailing list