added cabal build system

app/Main.hs

@@ -0,0 +1,14 @@
+module Main where
+
+import Parser
+import Compiler
+import System.Process
+import System.IO
+
+main :: IO ()
+main = do
+    contents <- getContents
+    withFile "out.asm" WriteMode (\f -> compileZorth f $ parseZorth contents)
+    readProcess "nasm" ["-f", "elf64", "out.asm", "-o", "out.o"] ""
+    readProcess "ld" ["out.o", "-o", "a.out"] ""
+    return ()