diff options
Diffstat (limited to 'hsm-repl/Test/Repl.hs')
| -rw-r--r-- | hsm-repl/Test/Repl.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/hsm-repl/Test/Repl.hs b/hsm-repl/Test/Repl.hs new file mode 100644 index 0000000..7d1431c --- /dev/null +++ b/hsm-repl/Test/Repl.hs @@ -0,0 +1,8 @@ +import Control.Monad.Loops (whileJust_) +import Data.Function ((&)) +import Effectful (runEff) +import Hsm.Log (Severity (Trace), runLog) +import Hsm.Repl (repl, runRepl) + +main :: IO () +main = whileJust_ repl return & runRepl @"exec-repl λ " @'["Prelude"] @[Bool] & runLog @"repl" Trace & runEff |