mirror of
https://github.com/Start9Labs/registry.git
synced 2026-03-26 10:21:51 +00:00
24 lines
682 B
Haskell
24 lines
682 B
Haskell
{-# LANGUAGE DataKinds #-}
|
|
{-# LANGUAGE FlexibleInstances #-}
|
|
{-# LANGUAGE GADTs #-}
|
|
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
|
|
{-# LANGUAGE MultiParamTypeClasses #-}
|
|
{-# LANGUAGE QuasiQuotes #-}
|
|
{-# LANGUAGE TemplateHaskell #-}
|
|
{-# LANGUAGE TypeFamilies #-}
|
|
module Model where
|
|
|
|
import Database.Persist.TH
|
|
|
|
share [mkPersist sqlSettings, mkMigrate "migrateAll"] [persistLowerCase|
|
|
-- AuthorizedKey
|
|
-- createdAt UTCTime
|
|
-- updatedAt UTCTime
|
|
-- name Text
|
|
-- pubKey CompressedKey
|
|
-- root Bool
|
|
-- UniquePubKey pubKey
|
|
-- deriving Eq
|
|
-- deriving Show
|
|
|]
|