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
Pulled genZipWithCall into VHDLSession monad
[matthijs/master-project/cλash.git]
/
Generate.hs
diff --git
a/Generate.hs
b/Generate.hs
index 8065363ca53b8ec7965e1636f4f6ba16e6907532..cc65979615bf67aa9a7b08e8164124e48434c909 100644
(file)
--- a/
Generate.hs
+++ b/
Generate.hs
@@
-64,8
+64,8
@@
genMapCall entity [arg, res] = return $ genSm
genZipWithCall ::
Entity
-> [CoreSyn.CoreBndr]
genZipWithCall ::
Entity
-> [CoreSyn.CoreBndr]
- -> AST.GenerateSm
-genZipWithCall entity [arg1, arg2, res] = genSm
+ ->
VHDLSession
AST.GenerateSm
+genZipWithCall entity [arg1, arg2, res] =
return $
genSm
where
-- Setup the generate scheme
len = (tfvec_len . Var.varType) res
where
-- Setup the generate scheme
len = (tfvec_len . Var.varType) res