projects
/
matthijs
/
master-project
/
cλash.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Make createEntity preserve the Entity on builtin functions.
[matthijs/master-project/cλash.git]
/
TranslatorTypes.hs
diff --git
a/TranslatorTypes.hs
b/TranslatorTypes.hs
index d50881600a11b9ec83d8a6ec7b83baa609bc0139..40529ea078d5e46805af27517a070450924c3638 100644
(file)
--- a/
TranslatorTypes.hs
+++ b/
TranslatorTypes.hs
@@
-76,6
+76,10
@@
modFunc :: (FuncData -> FuncData) -> HsFunction -> VHDLState ()
modFunc f hsfunc =
modFuncMap (Map.adjust f hsfunc)
modFunc f hsfunc =
modFuncMap (Map.adjust f hsfunc)
+-- | Get the map of functions in the session
+getFuncMap :: VHDLState FuncMap
+getFuncMap = State.gets funcs
+
-- | Modify the function map in the session using the given function
modFuncMap :: (FuncMap -> FuncMap) -> VHDLState ()
modFuncMap f = do
-- | Modify the function map in the session using the given function
modFuncMap :: (FuncMap -> FuncMap) -> VHDLState ()
modFuncMap f = do