diff options
| author | Marvin Borner | 2022-02-20 18:48:30 +0100 |
|---|---|---|
| committer | Marvin Borner | 2022-02-20 18:48:30 +0100 |
| commit | fa02225c5ae8b704408769c70bb47101042762b8 (patch) | |
| tree | 2bbd0763fccacd0a35631d6ee9a2176ed836eef5 /src/Fun.hs | |
| parent | 5cc450b6e8554f5d982f444b9026447971c94024 (diff) | |
Haskell ftw
Diffstat (limited to 'src/Fun.hs')
| -rw-r--r-- | src/Fun.hs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/Fun.hs b/src/Fun.hs new file mode 100644 index 0000000..fac4e23 --- /dev/null +++ b/src/Fun.hs @@ -0,0 +1,14 @@ +module Fun where + +import Fun.Compiler +import System.Environment + +usage :: IO () +usage = putStrLn "Usage: fun <path>" + +run :: IO () +run = do + args <- getArgs + case args of + [path] -> compile path + _ -> usage |