hiedb-0.4.0.0: test/data/Sub/Module2.hs

module Sub.Module2
    ( showInt
    , Data1(..)
    ) where

showInt :: Int -> String
showInt = show

data Data1
    = Data1Constructor1
    | Data1Constructor2 Int