add output mode

2018-04-28 14:26:07 -07:00
parent 845b57f428
commit 1cf5b34d07
1 changed files with 4 additions and 1 deletions
@@ -1,8 +1,11 @@
 module Main where

+data OutputMode = WasmBinary | JSWrapper deriving (Show, Eq)
+
 data WasmConfig = WasmConfig {
    inputFile :: String,
-    outputFile :: String
+    outputFile :: String,
+    outputMode :: OutputMode
 } deriving (Show, Eq)

 main :: IO ()