2
forM_ = flip mapM_
import Control.Monad.Cont
main = do
forM_ [1..3] $ \i -> do
print i
forM_ [7..9] $ \j -> do
print j
withBreak $ \break ->
forM_ [1..] $ \_ -> do
p "loop"
break()
where
withBreak = (`runContT` return) . callCC
p = liftIO . putStrLn
予想される出力は次のようになります。
$ runhaskell for.hs
1
2
3
7
8
9
loop
しかし、私は次のエラーを取得しています:
Test4.hs:2:1: parse error on input `import'
何がうまくいかないのですか?
他の定義の前にインポートする必要があります。その投稿の 'forM_ = flip mapM_'行はコードの一部ではないので、削除してください。 – duplode
@duplodeそれは答え、コメントではありません! –
また、私は近い票に反対します:これは非常に再現性があり、誤字ではありません。これは、私にとっては(単純であれば)完全にクロムのような質問のようです。 –