diff options
Diffstat (limited to 'compiler/simplStg/UnariseStg.hs')
| -rw-r--r-- | compiler/simplStg/UnariseStg.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplStg/UnariseStg.hs b/compiler/simplStg/UnariseStg.hs index 5c1d2b5c5d..0bfc15645c 100644 --- a/compiler/simplStg/UnariseStg.hs +++ b/compiler/simplStg/UnariseStg.hs @@ -730,7 +730,7 @@ mkIds :: FastString -> [UnaryType] -> UniqSM [Id] mkIds fs tys = mapM (mkId fs) tys mkId :: FastString -> UnaryType -> UniqSM Id -mkId = mkSysLocalOrCoVarM +mkId = mkSysLocalM isMultiValBndr :: Id -> Bool isMultiValBndr id |