suzanne.soy/tock-mirror
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed a monomorphism restriction warning in the Unnest module

Browse Source
This commit is contained in:
Neil Brown 2008-02-05 22:53:37 +00:00
parent caa0ddd2f9
commit 3cb4e80749
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
transformations/Unnest.hs
View File

@ -35,6 +35,7 @@ import Types
unnest :: Pass unnest :: Pass
unnest = runPasses passes unnest = runPasses passes
where where
passes :: [(String, Pass)]
passes = passes =
[ ("Convert free names to arguments", removeFreeNames) [ ("Convert free names to arguments", removeFreeNames)
, ("Pull nested definitions to top level", removeNesting) , ("Pull nested definitions to top level", removeNesting)