module HsDoc,
Fixity,
- HsModule(..), HsExtCore(..),
+ HsModule(..), HsExtCore(..), CodeFlavor(..)
) where
-- friends:
-- others:
import IfaceSyn ( IfaceBinding )
import Outputable
-import SrcLoc ( Located(..) )
+import SrcLoc
import Module ( Module, ModuleName )
import FastString
\end{code}
\begin{code}
+
+data CodeFlavor = LambdaFlavor | KappaFlavor
+
-- | All we actually declare here is the top-level structure for a module.
data HsModule name
= HsModule {