listBind :: String -> String -> IO ()
listBind filename name = do
core <- loadModule filename
listBind :: String -> String -> IO ()
listBind filename name = do
core <- loadModule filename
-- | Translate the binds with the given names from the given core module to
-- VHDL. The Bool in the tuple makes the function stateful (True) or
-- | Translate the binds with the given names from the given core module to
-- VHDL. The Bool in the tuple makes the function stateful (True) or
-- when it is a builtin function.
Monad.unless (Map.member hsfunc flatfuncmap) $ do
Monad.unless (elem hsfunc VHDL.builtin_hsfuncs) $ do
-- when it is a builtin function.
Monad.unless (Map.member hsfunc flatfuncmap) $ do
Monad.unless (elem hsfunc VHDL.builtin_hsfuncs) $ do
-- New function, resolve it
core <- getA tsCoreModule
-- Find the named function
-- New function, resolve it
core <- getA tsCoreModule
-- Find the named function