У меня есть это:
import Database.HDBC.Sqlite3
import Database.HDBC
Для преобразования извлеченных строк из базы данных я использую это:
convertFromSql :: [SqlValue] -> [String]
convertFromSql [name, address, number, postal, city, country] =
[cName, cAddress, cNumber, cPostal, cCity, cCountry] where
cName = (fromSql name)
cAddress = (fromSql address) :: String
cNumber = (fromSql number) :: String
cPostal = (fromSql postal) :: String
cCity = (fromSql city) :: String
cCountry = (fromSql country) :: String
Все работает, но могу ли я, например, map
fromSql
над списком записей, извлеченных из sql
? И, возможно, длинный снимок: zip
сопоставленный список со списком типов, так что код, подобный приведенному выше, является более кратким?