On 16/01/07, Yitzchak Gale <[EMAIL PROTECTED]> wrote:
listChars2 :: ListT IO Char
listChars2 = do
c <- lift getChar
if c == 'q'
then return c
else return c `mplus` listChars2
It's probably eaiser to work with normal lists:
listChars :: IO [Char]
listChars = do
c <- getChar
if c == 'q'
then return c
else liftM2 (:) (return c) listChars
--
-David House, [EMAIL PROTECTED]
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe
