X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=Translator.hs;h=1a753c2d52b592af9dbc50811bf90b5330f35702;hb=6b3da07384004751bc64ef88429f452dfe1cee45;hp=75a875bf8426e43f157e0ab6bf07f3435329326d;hpb=dfab6c0cb6ff708cd05b194f3b05815cf515339c;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git diff --git a/Translator.hs b/Translator.hs index 75a875b..1a753c2 100644 --- a/Translator.hs +++ b/Translator.hs @@ -42,7 +42,7 @@ import VHDLTypes import qualified VHDL main = do - makeVHDL "Alu.hs" "salu" + makeVHDL "Alu.hs" "register_bank" makeVHDL :: String -> String -> IO () makeVHDL filename name = do