randomIO causing stack overflow ?