ghci>str = ['a', '\NUL', 'b']
ghci>str
"a\NULb"
ghci>q = Database.Relational.relation . return . Database.Relational.value $ str
ghci>q
SELECT ALL 'ab' AS f0
ghci>show q
"SELECT ALL 'a\NULb' AS f0"
ghci>Database.HDBC.Record.Query.runQuery conn (Database.Relational.relationalQuery q) ()
*** Exception: SqlError {seState = "42601", seNativeError = 7, seErrorMsg = "execute: PGRES_FATAL_ERROR: ERROR:  unterminated quoted string at or near \"'a\"\nLINE 1: SELECT ALL 'a\n                   ^\n"}