examples/HDBC/MySQL: apply DeriveGeneric.

This commit is contained in:
Kei Hibino 2017-03-17 11:27:16 +09:00
parent b545487b97
commit 07b4ba68d6

View File

@ -1,11 +1,13 @@
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE DeriveGeneric #-}
module Example.User where
import GHC.Generics (Generic)
import Prelude hiding (id)
import Example.DataSource (defineTable)
$(defineTable
[]
"TEST" "user" [])
"TEST" "user" [''Generic])