Execute a Markov algorithm: Difference between revisions
m
→{{header|Haskell}}: "putStrLn" -> "putStr"
Underscore (talk | contribs) (→{{header|Perl}}: Whoops, empty angle brackets are more magical than I thought.) |
Underscore (talk | contribs) m (→{{header|Haskell}}: "putStrLn" -> "putStr") |
||
Line 428:
input <- getContents
case parse markovParser sourcePath source of
Right rules ->
Left err -> hPutStrLn stderr $ "Parse error at " ++ show err
| |||