1 files changed, 10 insertions, 3 deletions
diff --git a/src/Suem.hs b/src/Suem.hs
index f74976e..bbdfa78 100644
--- a/src/Suem.hs
+++ b/src/Suem.hs
@@ -1,4 +1,11 @@
-module Suem (printROM) where
+module Suem (Config(..), suem) where
 
-printROM :: IO ()
-printROM = putStrLn "ROM"
+data Config = Config {
+    freq :: Int,
+    ram  :: Int,
+    rom  :: String
+}
+
+suem :: Config -> IO ()
+suem (Config _ _ r) = putStrLn $ "Loaded " ++ r ++ " into ROM."
+suem _              = return ()