nikita-volkov/hasql
1
1
Fork 0
mirror of https://github.com/nikita-volkov/hasql.git synced 2024-11-28 22:01:47 +03:00
Code Issues Projects Releases Wiki Activity

Change the OID of composites from unknown to record

Browse Source
This commit is contained in:
Nikita Volkov 2023-10-31 19:58:48 +03:00
parent e8c8eb126f
commit 25f05bae79
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
library/Hasql/Private/Encoders.hs
View File

@ -304,7 +304,7 @@ array (Array (Array.Array valueOID arrayOID arrayEncoder renderer)) =
-- Lift a composite encoder into a value encoder. -- Lift a composite encoder into a value encoder.
composite :: Composite a -> Value a composite :: Composite a -> Value a
composite (Composite encode print) = composite (Composite encode print) =
Value (Value.unsafePTI PTI.binaryUnknown encodeValue printValue) Value (Value.unsafePTI PTI.record encodeValue printValue)
where where
encodeValue idt val = encodeValue idt val =
A.composite $ encode val idt A.composite $ encode val idt