Commit 90d53e5d authored by simonpj's avatar simonpj

[project @ 2000-12-19 08:34:40 by simonpj]

Add comment
parent b9b1dfb0
......@@ -160,6 +160,7 @@ mkTemplateLocals tys = zipWith (mkSysLocal SLIT("tpl"))
tys
mkTemplateLocalsNum :: Int -> [Type] -> [Id]
-- The Int gives the starting point for unique allocation
mkTemplateLocalsNum n tys = zipWith (mkSysLocal SLIT("tpl"))
(getNumBuiltinUniques n (length tys))
tys
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment