Adding pushing of hpc translation status through hi files.

[ghc-hetmet.git] / compiler / typecheck / TcDefaults.lhs

diff --git a/compiler/typecheck/TcDefaults.lhs b/compiler/typecheck/TcDefaults.lhs
index 6bd8b4a..f3f35d4 100644 (file)
--- a/compiler/typecheck/TcDefaults.lhs
+++ b/compiler/typecheck/TcDefaults.lhs
@@ -31,7 +31,7 @@ tcDefaults :: [LDefaultDecl Name]
                                    -- in Disambig.
 
 tcDefaults [] 
-  = getDefaultTys              -- No default declaration, so get the
+  = getDeclaredDefaultTys      -- No default declaration, so get the
                                -- default types from the envt; 
                                -- i.e. use the curent ones
                                -- (the caller will put them back there)