X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=GlobalNameTable.hs;h=9a6122778e91aee8a11a5d6180769c71f1208366;hb=a44db062ae75b4fe3ce28368e07323130a14fe58;hp=dda018c7fc1a41a7dcba431e6e7805f865d24965;hpb=a0c01abba26d4c00428d340d068f87a84afbc917;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git

diff --git a/GlobalNameTable.hs b/GlobalNameTable.hs
index dda018c..9a61227 100644
--- a/GlobalNameTable.hs
+++ b/GlobalNameTable.hs
@@ -27,6 +27,8 @@ globalNameTable = mkGlobalNameTable
   , (dropId           , (2, Left $ genExprFCall dropId                    ) )
   , (plusgtId         , (2, Left $ genExprFCall plusgtId                  ) )
   , (mapId            , (2, Right $ genMapCall                            ) )
+  , (zipWithId        , (3, Right $ genZipWithCall                        ) )
+  , (foldlId          , (3, Right $ genFoldlCall                          ) )
   , (emptyId          , (0, Left $ genExprFCall emptyId                   ) )
   , (singletonId      , (1, Left $ genExprFCall singletonId               ) )
   , (copyId           , (2, Left $ genExprFCall copyId                    ) )