Temporarily disable triggering of SC barrier on setting boolification protocol.

jnthn · jnthn · commit 06304cb96242 · 2012-02-28T16:13:58.000+01:00
diff --git a/src/ops/nqp.ops b/src/ops/nqp.ops
@@ -1919,7 +1919,7 @@ inline op set_boolification_spec(in PMC, in INT, in PMC) :base_core {
             mem_sys_free(st->boolification_spec);
         st->boolification_spec = new_spec;
         PARROT_GC_WRITE_BARRIER(interp, STABLE_PMC($1));
-        ST_SC_WRITE_BARRIER(st);
+        /*ST_SC_WRITE_BARRIER(st);*/
     }
     else {
         Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION,

Original file line number	Diff line number	Diff line change
`@@ -1919,7 +1919,7 @@ inline op set_boolification_spec(in PMC, in INT, in PMC) :base_core {`
`1919`	`1919`	`mem_sys_free(st->boolification_spec);`
`1920`	`1920`	`st->boolification_spec = new_spec;`
`1921`	`1921`	`PARROT_GC_WRITE_BARRIER(interp, STABLE_PMC($1));`
`1922`		`- ST_SC_WRITE_BARRIER(st);`
	`1922`	`+ /ST_SC_WRITE_BARRIER(st);/`
`1923`	`1923`	`}`
`1924`	`1924`	`else {`
`1925`	`1925`	`Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION,`