remembered some list sugar, stripped a println

4feb123d · Moses Nakamura · 38481431 · 4feb123d
Commit 4feb123d authored Apr 03, 2013 by Moses Nakamura
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 3 deletions

Main.hs compiler/src/Main.hs +1 -3

No files found.
--- a/compiler/src/Main.hs
+++ b/compiler/src/Main.hs
@@ -37,9 +37,7 @@ import CxxGenerator
 main::IO()
 main = do
    args <- getArgs
-    let lang = head args
-    putStrLn lang
-    let files = tail args
+    let (lang : files) = args
    handleFiles (generatorFnFor lang) files

 handleFiles (Right fn) files = mapM_ (handleFile fn) files