Main thread does not respect stack size RTS options

I was recently trying to start up with a large initial stack in a Haskell program so that I could give a large stack to some foreign code I was calling. Unfortunately, no matter what I did with the -K -ki and -kc RTS options, the stack size never seemed to change.

I suspect the problem can be traced to the the following comment in source:rts/RtsMain.c

/* ToDo: want to start with a larger stack size */

It looks to me like the main thread is started without attempting to adjust its stack size based on the RTS flags. Is that correct? If so, how hard is it to fix?

Trac metadata

Trac field	Value
Version	7.2.1
Type	Bug
TypeOfFailure	OtherFailure
Priority	normal
Resolution	Unresolved
Component	Runtime System
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture