fix cut-and-pasto in mkWeakForeignEnv#, causing random segfaults

3e180332 · Simon Marlow · ab4643fd · 3e180332
Commit 3e180332 authored May 15, 2009 by Simon Marlow
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

rts/PrimOps.cmm rts/PrimOps.cmm +1 -1

No files found.
--- a/rts/PrimOps.cmm
+++ b/rts/PrimOps.cmm
@@ -367,7 +367,7 @@ mkWeakForeignEnvzh_fast
  flag = R5;
  eptr = R6;

-  ALLOC_PRIM( SIZEOF_StgWeak, R1_PTR & R2_PTR & R3_PTR, mkWeakForeignEnvzh_fast );
+  ALLOC_PRIM( SIZEOF_StgWeak, R1_PTR & R2_PTR, mkWeakForeignEnvzh_fast );

  w = Hp - SIZEOF_StgWeak + WDS(1);
  SET_HDR(w, stg_WEAK_info, W_[CCCS]);