Ticket #8501: NoRecursiveDo1.hs

File NoRecursiveDo1.hs, 83 bytes (added by shelarcy, 19 months ago)
Line 
1module NoRecursiveDo where 
2
3foo = do
4    rec str <- return "foo"
5    putStrLn str