Tiny refactor plus comments
Tiny refactor plus comments

vTurbine/ghc,nkaretnikov/ghc,sdiehl/ghc,anton-dessiatov/ghc,vikraman/ghc,da-x/ghc,elieux/ghc,mfine/ghc,vTurbine/ghc,olsner/ghc,nkaretnikov/ghc,olsner/ghc,gridaphobe/ghc,mcschroeder/ghc,nushio3/ghc,nkaretnikov/ghc,GaloisInc/halvm-ghc,elieux/ghc,mfine/ghc,wxwxwwxxx/ghc,vikraman/ghc,sgillespie/ghc,tjakway/ghcjvm,olsner/ghc,ezyang/ghc,urbanslug/ghc,shlevy/ghc,snoyberg/ghc,mcschroeder/ghc,ghc-android/ghc,GaloisInc/halvm-ghc,vikraman/ghc,elieux/ghc,sgillespie/ghc,urbanslug/ghc,gridaphobe/ghc,ghc-android/ghc,ezyang/ghc,TomMD/ghc,oldmanmike/ghc,wxwxwwxxx/ghc,elieux/ghc,snoyberg/ghc,siddhanathan/ghc,AlexanderPankiv/ghc,tjakway/ghcjvm,shlevy/ghc,da-x/ghc,mfine/ghc,gridaphobe/ghc,siddhanathan/ghc,sdiehl/ghc,ghc-android/ghc,mcschroeder/ghc,urbanslug/ghc,oldmanmike/ghc,oldmanmike/ghc,mettekou/ghc,sdiehl/ghc,urbanslug/ghc,da-x/ghc,anton-dessiatov/ghc,acowley/ghc,ml9951/ghc,acowley/ghc,oldmanmike/ghc,nushio3/ghc,mcschroeder/ghc,vTurbine/ghc,mettekou/ghc,nkaretnikov/ghc,elieux/ghc,wxwxwwxxx/ghc,AlexanderPankiv/ghc,anton-dessiatov/ghc,oldmanmike/ghc,ml9951/ghc,sdiehl/ghc,AlexanderPankiv/ghc,snoyberg/ghc,anton-dessiatov/ghc,olsner/ghc,mettekou/ghc,ghc-android/ghc,snoyberg/ghc,ezyang/ghc,vTurbine/ghc,nushio3/ghc,ghc-android/ghc,urbanslug/ghc,mettekou/ghc,tjakway/ghcjvm,AlexanderPankiv/ghc,TomMD/ghc,vTurbine/ghc,gridaphobe/ghc,GaloisInc/halvm-ghc,ezyang/ghc,mettekou/ghc,ghc-android/ghc,vikraman/ghc,ml9951/ghc,snoyberg/ghc,elieux/ghc,mcschroeder/ghc,wxwxwwxxx/ghc,olsner/ghc,sdiehl/ghc,sgillespie/ghc,olsner/ghc,mfine/ghc,ml9951/ghc,wxwxwwxxx/ghc,AlexanderPankiv/ghc,ml9951/ghc,acowley/ghc,gridaphobe/ghc,acowley/ghc,siddhanathan/ghc,acowley/ghc,tjakway/ghcjvm,mcschroeder/ghc,ezyang/ghc,ghc-android/ghc,GaloisInc/halvm-ghc,mcschroeder/ghc,sgillespie/ghc,anton-dessiatov/ghc,tjakway/ghcjvm,urbanslug/ghc,ml9951/ghc,AlexanderPankiv/ghc,acowley/ghc,vikraman/ghc,oldmanmike/ghc,snoyberg/ghc,vikraman/ghc,sgillespie/ghc,oldmanmike/ghc,TomMD/ghc,shlevy/ghc,vTurbine/ghc,tjakway/ghcjvm,vikraman/ghc,nushio3/ghc,da-x/ghc,nkaretnikov/ghc,shlevy/ghc,ml9951/ghc,vTurbine/ghc,mettekou/ghc,urbanslug/ghc,sgillespie/ghc,gridaphobe/ghc,shlevy/ghc,wxwxwwxxx/ghc,mfine/ghc,nkaretnikov/ghc,nushio3/ghc,acowley/ghc,mfine/ghc,da-x/ghc,nushio3/ghc,wxwxwwxxx/ghc,da-x/ghc,anton-dessiatov/ghc,snoyberg/ghc,da-x/ghc,nkaretnikov/ghc,TomMD/ghc,siddhanathan/ghc,GaloisInc/halvm-ghc,shlevy/ghc,sdiehl/ghc,sgillespie/ghc,GaloisInc/halvm-ghc,TomMD/ghc,siddhanathan/ghc,AlexanderPankiv/ghc,ezyang/ghc,mettekou/ghc,siddhanathan/ghc,GaloisInc/halvm-ghc,ml9951/ghc,tjakway/ghcjvm,siddhanathan/ghc,shlevy/ghc,elieux/ghc,sdiehl/ghc,TomMD/ghc,nushio3/ghc,ezyang/ghc,olsner/ghc,mfine/ghc,anton-dessiatov/ghc,TomMD/ghc,gridaphobe/ghc