我试图让Hasql为“选择......在哪里”查询编码一个列表。如果我使用contramany
from contravariant-extras,它会进行类型检查,但在运行时出现语法错误。
import qualified Database.Encoders as E
import Contravariant.Extras
getTeamMembership :: Query [TeamId] [(TeamId, EmployeeId)]
getTeamMembership = statement q enc def True
where
enc = contramany (E.value E.teamId)
q = "select workteam, employee \
\from workteam_employee where workteam in $1"
不能对参数列表进行编码吗?