Rename SpecInfo to RuleInfo (upon SPJ's advice).
[ghc.git] / compiler / coreSyn / PprCore.hs
index 2ae1577..eb5e595 100644 (file)
@@ -418,7 +418,7 @@ ppIdInfo id info
     unf_info = unfoldingInfo info
     has_unf = hasSomeUnfolding unf_info
 
-    rules = specInfoRules (specInfo info)
+    rules = ruleInfoRules (ruleInfo info)
 
 showAttributes :: [(Bool,SDoc)] -> SDoc
 showAttributes stuff