Skip to content

Instantly share code, notes, and snippets.

@minamiyama1994

minamiyama1994/Helper.hs

Created April 18, 2014 21:41
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save minamiyama1994/11065702 to your computer and use it in GitHub Desktop.
Save minamiyama1994/11065702 to your computer and use it in GitHub Desktop.
Download ZIP
Yesodのmodelで好きな型をフィールドの型に使えるようにしたい ref: http://qiita.com/minamiyama1994/items/c0c5ca87948601dc0d84
Raw
Helper.hs
module Helper where
import Database.Persist.TH
import UserModule ( UserDefineType )
derivePersistField "UserDefineType"
Raw
Model.hs
--色々
import UserModule ( UserDefineType )
import Helper ( )
--色々
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment