diff options
author | Austin Seipp <austin@well-typed.com> | 2014-08-20 12:27:18 -0500 |
---|---|---|
committer | Austin Seipp <austin@well-typed.com> | 2014-08-20 12:27:18 -0500 |
commit | 8f3611ef222caf3bc2da4c7b3a1ca6e857e0bcee (patch) | |
tree | 9c88e2d0bf53be84ae5bf9621b3d2a75df37fdc6 /rts/RtsMain.c | |
parent | 7d4835603ef2e1f2c65e4c0f4c664fca50d74591 (diff) | |
download | haskell-8f3611ef222caf3bc2da4c7b3a1ca6e857e0bcee.tar.gz |
rts: detabify/dewhitespace RtsMain.c
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'rts/RtsMain.c')
-rw-r--r-- | rts/RtsMain.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/rts/RtsMain.c b/rts/RtsMain.c index ea45d6f050..fd5dd25cda 100644 --- a/rts/RtsMain.c +++ b/rts/RtsMain.c @@ -49,19 +49,19 @@ static void real_main(void) /* kick off the computation by creating the main thread with a pointer to mainIO_closure representing the computation of the overall program; then enter the scheduler with this thread and off we go; - + the same for GranSim (we have only one instance of this code) in a parallel setup, where we have many instances of this code running on different PEs, we should do this only for the main PE - (IAmMainThread is set in startupHaskell) + (IAmMainThread is set in startupHaskell) */ /* ToDo: want to start with a larger stack size */ - { - Capability *cap = rts_lock(); + { + Capability *cap = rts_lock(); rts_evalLazyIO(&cap,progmain_closure, NULL); - status = rts_getSchedStatus(cap); + status = rts_getSchedStatus(cap); rts_unlock(cap); } |