13 lines
244 B
Haskell
13 lines
244 B
Haskell
{-# LANGUAGE TypeFamilies #-}
|
|
module Classes.ToDatabase where
|
|
|
|
-- internal imports
|
|
|
|
import Classes.DatabaseRepresentation
|
|
|
|
class DatabaseRepresentation a => ToDatabase a where
|
|
|
|
-- type InTuple a :: Type
|
|
|
|
toDatabase :: a -> Representation a
|