mateamt/src/Classes/FromDatabase.hs

9 lines
151 B
Haskell
Raw Normal View History

{-# LANGUAGE TypeFamilies #-}
module Classes.FromDatabase where
class FromDatabase a where
type OutTuple a :: *
fromDatabase :: OutTuple a -> a