Fixed type error in example program
Getty Ritter
8 years ago
77 | 77 |
|
78 | 78 |
main :: IO ()
|
79 | 79 |
main = do
|
80 | |
sExprText <- pack . head <$> getContents
|
| 80 |
sExprText <- pack <$> getContents
|
81 | 81 |
either putStrLn print (decode myLangParser sExprText)
|
82 | 82 |
|
83 | 83 |
{-
|