[clean out unneeeded hsQualTypeHsContext function
John Meacham <john@repetae.net>**20090305011234
 Ignore-this: b891399f840f98f7a5c752ce814ab9af
] hunk ./FrontEnd/HsSyn.hs 283
-data HsQualType
-	 = HsQualType   { hsQualTypeContext :: HsContext, hsQualTypeType :: HsType }
+data HsQualType = HsQualType { hsQualTypeContext :: HsContext, hsQualTypeType :: HsType }
hunk ./FrontEnd/HsSyn.hs 287
-hsQualTypeHsContext HsQualType { hsQualTypeContext = c } = c
-
hunk ./FrontEnd/KindInfer.hs 530
-   ps = hsQualTypeHsContext qualType
+   ps = hsQualTypeContext qualType
hunk ./FrontEnd/TypeSynonyms.hs 57
-  | null vs, null (hsQualTypeHsContext t) = hsQualTypeType t
+  | null vs, null (hsQualTypeContext t) = hsQualTypeType t