関数型プログラミング言語Haskell Part32

[852 デフォルトの名無しさん 2019/12/17(火) 08:07:51.17 ID:hHVSxQ9g]

キャッシュ？ https://wandbox.org/permlink/98ZKnQW0uSr5c5CV

f () = print "hoge" >> getLine >>= \x -> print "foo" >> return (\() -> x)
main = do
putStrLn "1234"
f () >>= \g -> do
let e = g ()
print e
print e