mateamt/src/Classes/FromDatabase.hs

{-# LANGUAGE TypeFamilies #-}
module Classes.FromDatabase where

import Data.Kind (Type)

class FromDatabase a where

  type OutTuple a :: Type

  fromDatabase :: OutTuple a -> a
started fixing roles and database communication 2020-08-24 16:52:17 +00:00			`{-# LANGUAGE TypeFamilies #-}`
			`module Classes.FromDatabase where`

hunting warnings (deprecations mostly) 2022-04-15 13:35:53 +00:00			`import Data.Kind (Type)`

started fixing roles and database communication 2020-08-24 16:52:17 +00:00			`class FromDatabase a where`

hunting warnings (deprecations mostly) 2022-04-15 13:35:53 +00:00			`type OutTuple a :: Type`
started fixing roles and database communication 2020-08-24 16:52:17 +00:00
			`fromDatabase :: OutTuple a -> a`