haskell - Haskell生成实体时如何设置列映射关系？

Question

我正在尝试使用 Persistent 访问我的数据库。我知道 Persistent 可以生成实体的代码，但是有些东西我不能那么容易生成。就像我有一张看起来像这样的桌子：

CREATE TABLE `user` (
  `user_id` bigint(11) NOT NULL,
  `user_name` varchar(255) DEFAULT NULL,
  `user_password` varchar(255) DEFAULT NULL,
  PRIMARY KEY (`user_id`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8;

然后我的haskell代码如下：

mkPersist sqlSettings [persistLowerCase|
User
  name String
  password String
  deriving Show
|]

这些字段不同包括主键，我要设置它们的映射关系。官方页面（https://www.yesodweb.com/book/persistent）没有说明如何做。

我需要编写代码来定义它而不是生成它吗？

Answer 1

我在这个页面上找到了它https://github.com/yesodweb/persistent/blob/master/docs/Persistent-entity-syntax.md

我可以按照这些语法进行一些自定义。