diff options
author | Ben.Lippmeier@anu.edu.au <unknown> | 2009-11-06 09:08:50 +0000 |
---|---|---|
committer | Ben.Lippmeier@anu.edu.au <unknown> | 2009-11-06 09:08:50 +0000 |
commit | 374a85aec86d9c15ed4c48af3e284f9fee19ad72 (patch) | |
tree | c2d71204f5dfcabe05b8fe5e7635fb64bd7f07c4 /compiler/cmm/CLabel.hs | |
parent | a83cb1abd8ee3dfde9eec124bc9fe59ae94dcae8 (diff) | |
download | haskell-374a85aec86d9c15ed4c48af3e284f9fee19ad72.tar.gz |
validate fixes
Diffstat (limited to 'compiler/cmm/CLabel.hs')
-rw-r--r-- | compiler/cmm/CLabel.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/cmm/CLabel.hs b/compiler/cmm/CLabel.hs index 7dde9f9f75..31749d4a2c 100644 --- a/compiler/cmm/CLabel.hs +++ b/compiler/cmm/CLabel.hs @@ -530,6 +530,7 @@ needsCDecl ModuleRegdLabel = False needsCDecl (StringLitLabel _) = False needsCDecl (AsmTempLabel _) = False needsCDecl (RtsLabel _) = False +needsCDecl (CmmLabel _ _ _) = False needsCDecl l@(ForeignLabel _ _ _ _) = not (isMathFun l) needsCDecl (CC_Label _) = True needsCDecl (CCS_Label _) = True |