X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=Translator.hs;h=c4bcdbdf02084e9ad8ee8d1c2faf320873e983eb;hb=8ebcc3ed9b394000ccd07ffeb541f791444dfbc2;hp=396dfbc40e8e03769fea16d673281a0baeb01865;hpb=6093a850e28df3e081a80a73995e3b7279c106d5;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git

diff --git a/Translator.hs b/Translator.hs
index 396dfbc..c4bcdbd 100644
--- a/Translator.hs
+++ b/Translator.hs
@@ -49,7 +49,7 @@ import VHDLTypes
 import qualified VHDL
 
 main = do
-  makeVHDL "Alu.hs" "register_bank" True
+  makeVHDL "Alu.hs" "exec" True
 
 makeVHDL :: String -> String -> Bool -> IO ()
 makeVHDL filename name stateful = do