Multiple file support for generating assembly

1 files changed, 2 insertions, 2 deletions

diff --git a/src/Fun.hs b/src/Fun.hs
index fac4e23..7f69eda 100644
--- a/src/Fun.hs
+++ b/src/Fun.hs
@@ -10,5 +10,5 @@ run :: IO ()
 run = do
   args <- getArgs
   case args of
-    [path] -> compile path
-    _      -> usage
+    []    -> usage
+    paths -> compile paths