module DefinedNamesBase(module DefinedNames) where -- all instances are exported anyway... import Syntax(HsDeclI,HsTypeI,HsPatI) import DefinedNames import DefinedNamesBaseStruct() -- This module contains just the knot tying definitions for -- the base syntax. The reusable instances for the base structure -- are located in DefinedNamesBaseStruct. instance DefinedNames i (HsDeclI i) where definedNames = definedNamesRec classMethods = classMethodsRec -- Only for type patterns: instance DefinedNames i (HsTypeI i) where definedNames = definedNamesRec -- no need to define classMethods instance DefinedNames i (HsPatI i) where definedNames = definedNamesRec -- no need to define classMethods