[Haskell-cafe] random colors, stack space overflow, mersenne and mersenne.pure64

[Brandon S. Allbery KF8NH]

On 2008 Sep 12, at 21:57, Don Stewart wrote:
> cetin.sert:
>>     random  = color2
>>     randomR = colorR
>>
>>   color2 :: RandomGen g .$B"M.(B g .$B"*.(B (RGB,g)
>>   color2 = colorR (minRGB,maxRGB)
>>
>>   color :: RandomGen g .$B"M.(B g .$B"*.(B (RGB,g)
>>   color s0 = ((r,g,b),s3)
>>     where
>
> There's some corruption in this text. Could you post the file  
> somewhere?

It's not corrupt; he used UTF-8 symbols.  It shows up properly in  
Mail.app but doesn't quote right (admittedly I force plaintext).

-- 
brandon s. allbery [solaris,freebsd,perl,pugs,haskell] allbery at kf8nh.com
system administrator [openafs,heimdal,too many hats] allbery at ece.cmu.edu
electrical and computer engineering, carnegie mellon university    KF8NH