As requested, I am reporting the following bug that appeared during a ghci session on a Debian testing box.
Regards, Yitz ___ ___ _ / _ \ /\ /\/ __(_) / /_\// /_/ / / | | GHC Interactive, version 6.0.1, for Haskell 98. / /_\\/ __ / /___| | http://www.haskell.org/ghc/ \____/\/ /_/\____/|_| Type :? for help.
Loading package base ... linking ... done.
Prelude> replicate 5 "foo"
["foo","foo","foo","foo","foo"]
Prelude> do {a <- sequence (replicate 10 (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print a}
[2,1,1,4,3,3,2,4,4,3]
Prelude> do {a <- sequence (replicate 10 (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print a}
[1,2,2,2,1,4,2,1,4,3]
Prelude> do {a <- sequence (replicate 10 (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print a}
[4,1,3,4,2,4,4,2,4,2]
Prelude> do {a <- sequence (replicate 10 (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print a}
[3,4,4,1,5,1,4,2,1,1]
Prelude> do {a <- sequence (replicate 10 (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print a}
[2,4,3,2,2,4,1,4,4,2]
Prelude> do {a <- sequence (replicate 10 (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print a}
[5,4,2,3,4,1,5,3,3,1]
Prelude> do {a <- sequence (repeat (System.Random.getStdRandom (System.Random.randomR (1::Int, 5)))); print (take 10 a)}
Interrupted.
Prelude> do {a <- sequence (replicate 10 (System.Random.randomRIO (1::Int, 5))); print a}
[*** Exception: stack overflow
Prelude> do {a <- sequence (replicate 10 (System.Random.randomRIO (1::Int, 5))); print a}
<interactive>: internal error: eval_thunk_selector: strange selectee 29
Please report this as a bug to [EMAIL PROTECTED],
or http://www.sourceforge.net/projects/ghc/
_______________________________________________ Glasgow-haskell-bugs mailing list [EMAIL PROTECTED] http://www.haskell.org/mailman/listinfo/glasgow-haskell-bugs
