[project @ 2003-10-21 13:24:31 by simonmar] Make the GHC implementation of peekCString run in constant stack-space by checking the length of the array first and then working backwards from the end.  Interestingly, this version is faster than the original.
[project @ 2003-10-21 13:24:31 by simonmar]
Make the GHC implementation of peekCString run in constant stack-space
by checking the length of the array first and then working backwards
from the end.  Interestingly, this version is faster than the original.

GaloisInc/halvm-ghc,vikraman/ghc,nathyong/microghc-ghc,sgillespie/ghc,ezyang/ghc,vikraman/ghc,forked-upstream-packages-for-ghcjs/ghc,fmthoma/ghc,bitemyapp/ghc,oldmanmike/ghc,nathyong/microghc-ghc,jstolarek/ghc,siddhanathan/ghc,nathyong/microghc-ghc,mfine/ghc,AlexanderPankiv/ghc,acowley/ghc,gcampax/ghc,elieux/ghc,tjakway/ghcjvm,frantisekfarka/ghc-dsi,snoyberg/ghc,tjakway/ghcjvm,urbanslug/ghc,anton-dessiatov/ghc,snoyberg/ghc,gcampax/ghc,christiaanb/ghc,gridaphobe/ghc,siddhanathan/ghc,jstolarek/ghc,wxwxwwxxx/ghc,oldmanmike/ghc,fmthoma/ghc,tibbe/ghc,ryantm/ghc,GaloisInc/halvm-ghc,nushio3/ghc,siddhanathan/ghc,fmthoma/ghc,christiaanb/ghc,nkaretnikov/ghc,sdiehl/ghc,lukexi/ghc,shlevy/ghc,elieux/ghc,mettekou/ghc,olsner/ghc,nathyong/microghc-ghc,mcschroeder/ghc,ghc-android/ghc,GaloisInc/halvm-ghc,ghc-android/ghc,gcampax/ghc,lukexi/ghc,da-x/ghc,sdiehl/ghc,holzensp/ghc,nkaretnikov/ghc,elieux/ghc,sdiehl/ghc,tibbe/ghc,gridaphobe/ghc,anton-dessiatov/ghc,ml9951/ghc,AlexanderPankiv/ghc,gcampax/ghc,frantisekfarka/ghc-dsi,ryantm/ghc,acowley/ghc,ryantm/ghc,mfine/ghc,acowley/ghc,nathyong/microghc-ghc,AlexanderPankiv/ghc,frantisekfarka/ghc-dsi,tjakway/ghcjvm,mettekou/ghc,da-x/ghc,holzensp/ghc,mfine/ghc,bitemyapp/ghc,urbanslug/ghc,ml9951/ghc,spacekitteh/smcghc,ryantm/ghc,bitemyapp/ghc,gridaphobe/ghc,ml9951/ghc,wxwxwwxxx/ghc,ghc-android/ghc,oldmanmike/ghc,shlevy/ghc,mcschroeder/ghc,vTurbine/ghc,lukexi/ghc,TomMD/ghc,gridaphobe/ghc,snoyberg/ghc,tibbe/ghc,nushio3/ghc,gridaphobe/ghc,gridaphobe/ghc,olsner/ghc,green-haskell/ghc,gcampax/ghc,spacekitteh/smcghc,nushio3/ghc,mettekou/ghc,GaloisInc/halvm-ghc,snoyberg/ghc,olsner/ghc,ghc-android/ghc,oldmanmike/ghc,urbanslug/ghc,gcampax/ghc,frantisekfarka/ghc-dsi,lukexi/ghc,wxwxwwxxx/ghc,ezyang/ghc,wxwxwwxxx/ghc,mfine/ghc,olsner/ghc,christiaanb/ghc,acowley/ghc,AlexanderPankiv/ghc,snoyberg/ghc,mcschroeder/ghc,vTurbine/ghc,nushio3/ghc,nushio3/ghc,forked-upstream-packages-for-ghcjs/ghc,holzensp/ghc,TomMD/ghc,spacekitteh/smcghc,snoyberg/ghc,AlexanderPankiv/ghc,mfine/ghc,olsner/ghc,tjakway/ghcjvm,fmthoma/ghc,forked-upstream-packages-for-ghcjs/ghc,christiaanb/ghc,vikraman/ghc,olsner/ghc,tibbe/ghc,mfine/ghc,fmthoma/ghc,holzensp/ghc,TomMD/ghc,elieux/ghc,anton-dessiatov/ghc,sdiehl/ghc,tjakway/ghcjvm,sgillespie/ghc,ml9951/ghc,wxwxwwxxx/ghc,vikraman/ghc,lukexi/ghc,jstolarek/ghc,fmthoma/ghc,shlevy/ghc,oldmanmike/ghc,snoyberg/ghc,ghc-android/ghc,nathyong/microghc-ghc,green-haskell/ghc,siddhanathan/ghc,vTurbine/ghc,sgillespie/ghc,gcampax/ghc,mcschroeder/ghc,mettekou/ghc,wxwxwwxxx/ghc,sdiehl/ghc,elieux/ghc,green-haskell/ghc,fmthoma/ghc,elieux/ghc,vTurbine/ghc,elieux/ghc,AlexanderPankiv/ghc,nkaretnikov/ghc,frantisekfarka/ghc-dsi,TomMD/ghc,oldmanmike/ghc,gridaphobe/ghc,mcschroeder/ghc,green-haskell/ghc,urbanslug/ghc,sdiehl/ghc,holzensp/ghc,mcschroeder/ghc,urbanslug/ghc,vikraman/ghc,nkaretnikov/ghc,vTurbine/ghc,sgillespie/ghc,ghc-android/ghc,vTurbine/ghc,tibbe/ghc,vTurbine/ghc,urbanslug/ghc,anton-dessiatov/ghc,shlevy/ghc,acowley/ghc,olsner/ghc,AlexanderPankiv/ghc,nkaretnikov/ghc,nkaretnikov/ghc,jstolarek/ghc,ezyang/ghc,GaloisInc/halvm-ghc,nathyong/microghc-ghc,green-haskell/ghc,vikraman/ghc,ryantm/ghc,shlevy/ghc,siddhanathan/ghc,ml9951/ghc,forked-upstream-packages-for-ghcjs/ghc,spacekitteh/smcghc,christiaanb/ghc,da-x/ghc,TomMD/ghc,ezyang/ghc,da-x/ghc,oldmanmike/ghc,wxwxwwxxx/ghc,ml9951/ghc,mettekou/ghc,GaloisInc/halvm-ghc,mcschroeder/ghc,mfine/ghc,anton-dessiatov/ghc,nkaretnikov/ghc,siddhanathan/ghc,nushio3/ghc,bitemyapp/ghc,forked-upstream-packages-for-ghcjs/ghc,christiaanb/ghc,jstolarek/ghc,da-x/ghc,vikraman/ghc,shlevy/ghc,sdiehl/ghc,spacekitteh/smcghc,ezyang/ghc,acowley/ghc,christiaanb/ghc,anton-dessiatov/ghc,bitemyapp/ghc,siddhanathan/ghc,ml9951/ghc,tjakway/ghcjvm,forked-upstream-packages-for-ghcjs/ghc,ezyang/ghc,da-x/ghc,da-x/ghc,ezyang/ghc,anton-dessiatov/ghc,sgillespie/ghc,mettekou/ghc,mettekou/ghc,TomMD/ghc,sgillespie/ghc,TomMD/ghc,urbanslug/ghc,tjakway/ghcjvm,acowley/ghc,nushio3/ghc,sgillespie/ghc,forked-upstream-packages-for-ghcjs/ghc,GaloisInc/halvm-ghc,ml9951/ghc,shlevy/ghc,ghc-android/ghc