12 lines
251 B
Haskell
12 lines
251 B
Haskell
{-# LANGUAGE TypeFamilies #-}
|
|
module Classes.FromDatabase where
|
|
|
|
-- internal imports
|
|
|
|
import Classes.DatabaseRepresentation
|
|
|
|
class DatabaseRepresentation a => FromDatabase a where
|
|
|
|
-- type OutTuple a :: Type
|
|
|
|
fromDatabase :: Representation a -> a
|