mirror of
https://github.com/j-mie6/design-patterns-for-parser-combinators.git
synced 2024-10-05 18:27:51 +03:00
Change company name
This commit is contained in:
parent
4c2513c84e
commit
651d8f4a8d
@ -11,7 +11,7 @@ calc e = eval (fromEither error (parseExpr e))
|
|||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = do
|
main = do
|
||||||
putStrLn "This is the Really Amazing Calculator"
|
putStrLn "This is the Really Cool Calculator (from Really Cool Calculator Inc)"
|
||||||
putStrLn "Enter an equation, variables x1, xy, and z are available"
|
putStrLn "Enter an equation, variables x1, xy, and z are available"
|
||||||
eq <- getLine
|
eq <- getLine
|
||||||
print $ calc eq ctx
|
print $ calc eq ctx
|
||||||
|
Loading…
Reference in New Issue
Block a user