X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FSchedule.c;h=3d87003756ff7f72fbb9f0ba696e627f2ab9bbd7;hp=fa8a65128a62472515f02cd71d05ddd13e937c45;hb=85174045bbcc05adb28447d423794d1f087da59e;hpb=dd605e295e2a7ee92dc0511d81ebef4984eacf1e

diff --git a/rts/Schedule.c b/rts/Schedule.c
index fa8a651..3d87003 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -2111,7 +2111,7 @@ scheduleDoGC (Capability *cap, Task *task USED_IF_THREADS, rtsBool force_major)
  * Singleton fork(). Do not copy any running threads.
  * ------------------------------------------------------------------------- */
 
-StgInt
+pid_t
 forkProcess(HsStablePtr *entry
 #ifndef FORKPROCESS_PRIMOP_SUPPORTED
 	    STG_UNUSED