HsTypeStruct.hs

-- $Id: HsTypeStruct.hs,v 1.21 2001/10/09 02:19:41 hallgren Exp $

module HsTypeStruct where

data TI i t  
    = HsTyFun t t
    | HsTyTuple [t]
    | HsTyApp t t
    | HsTyVar i
    | HsTyCon i
      deriving (Eq)