diff options
| author | Arnaud Bailly <arnaud@pankzsoft.com> | 2025-11-05 12:02:23 +0100 |
|---|---|---|
| committer | Arnaud Bailly <arnaud@pankzsoft.com> | 2025-11-05 12:02:23 +0100 |
| commit | 99e2ce71faa82e7b99574895e0fe24183ba9f6c3 (patch) | |
| tree | 10538bb91d187a3c1d281a87a3974a6036f2ad2f /lambda-calcul/haskell/app/Main.hs | |
| parent | 438e3f8c5dcdfeead15a6a9a1760f7c254fc54b2 (diff) | |
| download | lambda-nantes-99e2ce71faa82e7b99574895e0fe24183ba9f6c3.tar.gz | |
can parse whole programs and load them
Diffstat (limited to 'lambda-calcul/haskell/app/Main.hs')
| -rw-r--r-- | lambda-calcul/haskell/app/Main.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lambda-calcul/haskell/app/Main.hs b/lambda-calcul/haskell/app/Main.hs index 769d2f0..6ba9321 100644 --- a/lambda-calcul/haskell/app/Main.hs +++ b/lambda-calcul/haskell/app/Main.hs @@ -1,5 +1,4 @@ -import Minilang.IO (runEval) -import Minilang.REPL (withTerminal) +import Minilang.REPL (withIO, withTerminal) import Minilang.Server (startServer, waitServer) import Options.Applicative import System.IO (stdin, stdout) @@ -58,5 +57,5 @@ main = do hasTty <- queryTerminal stdInput if hasTty then withTerminal - else runEval stdin stdout + else withIO stdin stdout Server -> startServer serverPort >>= waitServer |