mateamt/src/Classes/FromDatabase.hs

11 lines
179 B
Haskell

{-# LANGUAGE TypeFamilies #-}
module Classes.FromDatabase where
import Data.Kind (Type)
class FromDatabase a where
type OutTuple a :: Type
fromDatabase :: OutTuple a -> a