Fix bug in forkProcess: it should be using RET_N rather than returing
directly. Makes a difference for unregisterised only.
Remove dead code in atomicModifyMVarzh_fast.
/* -----------------------------------------------------------------------------
- * $Id: PrimOps.hc,v 1.106 2003/03/24 14:46:54 simonmar Exp $
+ * $Id: PrimOps.hc,v 1.107 2003/04/15 14:37:12 simonmar Exp $
*
* (c) The GHC Team, 1998-2002
*
r->payload[0] = z;
RET_P(r);
- JMP_(ENTRY_CODE(Sp[0]));
FE_
}
R1.i = RET_STGCALL1(StgInt, forkProcess, CurrentTSO);
- JMP_(ENTRY_CODE(Sp[0]));
-
+ RET_N(R1.i);
FE_
}