yesod-dsl-0.1.1.11: codegen/fay-entity.cg
Entity {
entityName = "~{entityName e}",
entityInstances = [~{intercalate ", " (map show (entityInstances e))}],
entityFields = [
~{indent 8 $ intercalate ",\n" (map trField (entityFields e))}
],
entityChecks = [~{intercalate ", " (map show (entityChecks e))}]
}