[svn:parrot] r41037 - branches/kill_parrot_cont/src/gc
bacek at svn.parrot.org
bacek at svn.parrot.org
Sun Sep 6 04:53:59 UTC 2009
Author: bacek
Date: Sun Sep 6 04:53:59 2009
New Revision: 41037
URL: https://trac.parrot.org/parrot/changeset/41037
Log:
Temporary comment-out strict asserts on accessing registers in Context.
Apparently, JIT is broken and I don't have enough energy and tuits to fix it.
Commenting out just to merge kill_parrot_cont branch with clean "make fulltest"
pass
Modified:
branches/kill_parrot_cont/src/gc/alloc_register.c
Modified: branches/kill_parrot_cont/src/gc/alloc_register.c
==============================================================================
--- branches/kill_parrot_cont/src/gc/alloc_register.c Sun Sep 6 04:46:26 2009 (r41036)
+++ branches/kill_parrot_cont/src/gc/alloc_register.c Sun Sep 6 04:53:59 2009 (r41037)
@@ -490,7 +490,9 @@
Parrot_pcc_get_INTVAL_reg(PARROT_INTERP, ARGIN(PMC *ctx), UINTVAL idx)
{
ASSERT_ARGS(Parrot_pcc_get_INTVAL_reg)
+ /*
PARROT_ASSERT(Parrot_pcc_get_regs_used(interp, ctx, REGNO_INT) > idx);
+ */
return &(Parrot_pcc_get_context_struct(interp, ctx)->bp.regs_i[idx]);
}
@@ -511,7 +513,9 @@
Parrot_pcc_get_FLOATVAL_reg(PARROT_INTERP, ARGIN(PMC *ctx), UINTVAL idx)
{
ASSERT_ARGS(Parrot_pcc_get_FLOATVAL_reg)
+ /*
PARROT_ASSERT(Parrot_pcc_get_regs_used(interp, ctx, REGNO_NUM) > idx);
+ */
return &(Parrot_pcc_get_context_struct(interp, ctx)->bp.regs_n[-1L - idx]);
}
@@ -532,7 +536,9 @@
Parrot_pcc_get_STRING_reg(PARROT_INTERP, ARGIN(PMC *ctx), UINTVAL idx)
{
ASSERT_ARGS(Parrot_pcc_get_STRING_reg)
+ /*
PARROT_ASSERT(Parrot_pcc_get_regs_used(interp, ctx, REGNO_STR) > idx);
+ */
return &(Parrot_pcc_get_context_struct(interp, ctx)->bp_ps.regs_s[idx]);
}
@@ -552,7 +558,9 @@
Parrot_pcc_get_PMC_reg(PARROT_INTERP, ARGIN(PMC *ctx), UINTVAL idx)
{
ASSERT_ARGS(Parrot_pcc_get_PMC_reg)
+ /*
PARROT_ASSERT(Parrot_pcc_get_regs_used(interp, ctx, REGNO_PMC) > idx);
+ */
return &(Parrot_pcc_get_context_struct(interp, ctx)->bp_ps.regs_p[-1L - idx]);
}
More information about the parrot-commits
mailing list