У меня есть такая файловая структура:
--- Database.hs ---
data Database = ...
...
--- User.hs ---
import Database
addUser :: Update Database ()
...
--- Post.hs
import Database
addPost :: Update Database ()
...
Проблема в том, что мне нужно вызывать makeAcidic ''Database [...]
как в User.hs
, так и в Post.hs
, чтобы сделать их функции кислотными, но makeAcidic
в то же время генерировать IsAcidic
экземпляров для Database
, поэтому GHC жалуется на дублирующие объявления экземпляров.