10 lines
201 B
Haskell
10 lines
201 B
Haskell
|
-- @Employment.hs
|
||
|
|
{-# LANGUAGE TemplateHaskell #-}
|
||
|
|
module MyTypes where
|
||
|
|
|
||
|
|
import Database.Persist.TH
|
||
|
|
import Prelude
|
||
|
|
|
||
|
|
data FSStatus = undefined
|
||
|
|
deriving (Show, Read, Eq)
|
||
|
|
derivePersistField "FSStatus"
|