[Haskell-beginners] Help with monads (I think...)

[Andrew Wagner]

Yes, this is much more idiomatic haskell.

On Sat, Feb 21, 2009 at 4:59 AM, Thomas Davie <tom.davie at gmail.com> wrote:

>
> On 21 Feb 2009, at 01:30, Patrick LeBoutillier wrote:
>
> Hi all,
>
> I'm trying to implement the following simple Perl program in Haskell:
>
>  my $nb_tests = 0 ;
>
>  sub ok {
>          my $bool = shift ;
>          $nb_tests++ ;
>          print STDOUT ($bool ? "ok" : "nok") . " $nb_tests\n" ;
>  }
>
>  ok(0) ;
>  ok(1) ;
>
> The output is:
>
>  nok 1
>  ok 2
>
> I'm pretty much a Haskell newbie, but I know a bit about monads (and
> have been reading "Real World Haskell"), and I think I need to put the
> ok function must live inside some kind of state monad. My problem is
> that I also would like the ok function to perform some IO (as shown
> above, print).
>
> How is a case like this handled? Can my function live in 2 monads?
>
>
> I personally wouldn't use two monads at all for this – in fact, I'd only
> use IO in one function:
>
> main = putStr . unlines . results inputs . snd . tests $ inputs
>
> inputs = [1,2]
>
> tests = foldr (\_ (x,l) -> (not x, x:l)) (True,[])
>
> results = zipWith result
> result testN True  = "ok "  ++ show testN
> result testN False = "nok " ++ show testN
>
> Bob
>
> _______________________________________________
> Beginners mailing list
> Beginners at haskell.org
> http://www.haskell.org/mailman/listinfo/beginners
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.haskell.org/pipermail/beginners/attachments/20090221/c4b40170/attachment.htm