<table cellspacing="0" cellpadding="0" border="0" ><tr><td valign="top" style="font: inherit;">For the code below, if I CNTL-C after the list is printed, and run it again, I get a different list of colors, each time. This doesn't seem to be happening with my earlier example.<br><br>Michael<br><br>=============<br><br>import System.Random<br>import Data.Ord<br><br>data Color<br>&nbsp;&nbsp;&nbsp; = Red<br>&nbsp;&nbsp;&nbsp; | Blue<br>&nbsp;&nbsp;&nbsp; | Green<br>&nbsp;&nbsp;&nbsp; | Yellow<br>&nbsp;&nbsp;&nbsp; | Orange<br>&nbsp;&nbsp;&nbsp; | Brown<br>&nbsp;&nbsp;&nbsp; deriving (Show, Read, Eq, Enum, Ord, Bounded)<br><br>main = do<br>&nbsp; gen &lt;- getStdGen<br>&nbsp; let code = map toEnum $ take 4 $ randomRs (0,5) gen :: [Color]<br>&nbsp; putStrLn $ "List is " ++ show code<br>&nbsp; guessString &lt;- getLine<br>&nbsp; newGen &lt;- newStdGen<br>&nbsp; main <br><br><br>--- On <b>Sun, 10/11/09, Felipe Lessa <i>&lt;felipe.lessa@gmail.com&gt;</i></b>
 wrote:<br><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><br>From: Felipe Lessa &lt;felipe.lessa@gmail.com&gt;<br>Subject: Re: [Haskell-cafe] Simple program. Simple problem?<br>To: haskell-cafe@haskell.org<br>Date: Sunday, October 11, 2009, 7:08 PM<br><br><div class="plainMail">On Mon, Oct 12, 2009 at 12:42:16AM +0200, Peter Verswyvelen wrote:<br>&gt; btw I always find it amusing to play with interact and lazy IO:<br><br>I always find it frightening to play with lazy IO :).<br><br>--<br>Felipe.<br>_______________________________________________<br>Haskell-Cafe mailing list<br><a ymailto="mailto:Haskell-Cafe@haskell.org" href="/mc/compose?to=Haskell-Cafe@haskell.org">Haskell-Cafe@haskell.org</a><br><a href="http://www.haskell.org/mailman/listinfo/haskell-cafe" target="_blank">http://www.haskell.org/mailman/listinfo/haskell-cafe</a><br></div></blockquote></td></tr></table><br>