summaryrefslogtreecommitdiff
path: root/rts/RtsAPI.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2010-09-24 15:02:02 +0000
committerSimon Marlow <marlowsd@gmail.com>2010-09-24 15:02:02 +0000
commit41bfdf710742595e6043d9b851e8dab30ffe6d2f (patch)
tree75099938ff137a58625874981f446ea3e8078e60 /rts/RtsAPI.c
parent92a5f4abbd32c0a28b75207b368d86e59515683d (diff)
downloadhaskell-41bfdf710742595e6043d9b851e8dab30ffe6d2f.tar.gz
remove unnecessary stg_noForceIO (#3508)
Diffstat (limited to 'rts/RtsAPI.c')
-rw-r--r--rts/RtsAPI.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/rts/RtsAPI.c b/rts/RtsAPI.c
index fb9c0107a0..53628dc61a 100644
--- a/rts/RtsAPI.c
+++ b/rts/RtsAPI.c
@@ -394,7 +394,6 @@ createIOThread (Capability *cap, nat stack_size, StgClosure *closure)
{
StgTSO *t;
t = createThread (cap, stack_size);
- pushClosure(t, (W_)&stg_noforceIO_info);
pushClosure(t, (W_)&stg_ap_v_info);
pushClosure(t, (W_)closure);
pushClosure(t, (W_)&stg_enter_info);