git.iko.soy/rowtype-yoga/purescript-native
on ebbc4e4 help sign in
13 lines 288 B history raw
1module Main where
3import Prelude
4import Control.Monad.Eff
5import Control.Monad.Eff.Console
7replicateM_ :: forall m a. (Monad m) => Number -> m a -> m {}
8replicateM_ 0.0 _ = return {}
9replicateM_ n act = do
10 act
11 replicateM_ (n - 1.0) act
13main = replicateM_ 10.0 (log "Hello World!")