cvs commit: fptools/libraries/base/Foreign/C String.hs

[Simon Marlow]

> sof         2003/10/07 09:56:33 PDT
> 
>   Modified files:
>     libraries/base/Foreign/C String.hs 
>   Log:
>   peekCString{Len}: tweak GHC impls (why are these provided anyway?)

Efficiency.  I tried to get the deforestation machinery to work on the
original definitions of peekCString(Len) but didn't succeed, and these
functions are fairly heavily used so warrant some special treatment.  

Thanks for spotting that I forgot to seq the castCCharToChar.  Also, we
should be accumulating backwards in the peekCString case too - I'll take
a look at this.

Cheers,
	Simon