refactor: add Hasql arrayColumn decoder

This commit is contained in:
steve-chavez
2020-10-29 18:53:24 -05:00
committed by Steve Chavez
parent 04eaeec7fc
commit a6696f3ba1
3 changed files with 5 additions and 7 deletions
+2 -2
View File
@@ -98,10 +98,10 @@ decodeRels tables cols =
<$> column HD.text
<*> column HD.text
<*> column HD.text
<*> column (HD.array (HD.dimension replicateM (element HD.text)))
<*> arrayColumn HD.text
<*> column HD.text
<*> column HD.text
<*> column (HD.array (HD.dimension replicateM (element HD.text)))
<*> arrayColumn HD.text
decodePks :: [Table] -> HD.Result [PrimaryKey]
decodePks tables =