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
Check parameter counts in mkConcSm instead of the actual generate functions.
[matthijs/master-project/cλash.git]
/
GlobalNameTable.hs
diff --git
a/GlobalNameTable.hs
b/GlobalNameTable.hs
index 8c3faab22c66467362bacb2d64c2fdd165f5de00..756c6113c932e978e29a7bccd52d84669250e0e0 100644
(file)
--- a/
GlobalNameTable.hs
+++ b/
GlobalNameTable.hs
@@
-17,8
+17,8
@@
mkGlobalNameTable = Map.fromList
globalNameTable :: NameTable
globalNameTable = mkGlobalNameTable
globalNameTable :: NameTable
globalNameTable = mkGlobalNameTable
- [ ("!" , (2, genExprFCall
2L exId
) )
- , ("head" , (1, genExprFCall
1L headId
) )
+ [ ("!" , (2, genExprFCall
exId
) )
+ , ("head" , (1, genExprFCall
headId
) )
, ("hwxor" , (2, genExprOp2 AST.Xor ) )
, ("hwand" , (2, genExprOp2 AST.And ) )
, ("hwor" , (2, genExprOp2 AST.And ) )
, ("hwxor" , (2, genExprOp2 AST.Xor ) )
, ("hwand" , (2, genExprOp2 AST.And ) )
, ("hwor" , (2, genExprOp2 AST.And ) )