mateamt/src/Classes/ToDatabase.hs

9 lines
143 B
Haskell

{-# LANGUAGE TypeFamilies #-}
module Classes.ToDatabase where
class ToDatabase a where
type InTuple a :: *
toDatabase :: a -> InTuple a