@@ -242,7 +242,7 @@ composite
242242 :: SListI ys
243243 => NP Decoding.Value ys
244244 -> Decoding.Value (NP Maybe ys)
245−composite decoders = do
245+composite fields = do
246246-- [for each field]
247247-- <OID of field's type: sizeof(Oid) bytes>
248248-- [if value is NULL]
@@ -255,11 +255,11 @@ composite decoders = do
255255-- <number of fields: 4 bytes>
256256 unitOfSize 4
257257 let
258− each decoder = do
258+ each field = do
259259 unitOfSize 4
260260 len <- sized 4 Decoding.int
261− if len == -1 then return Nothing else Just <$> sized len decoder
262− htraverse' each decoders
261+ if len == -1 then return Nothing else Just <$> sized len field
262+ htraverse' each fields
263263
264264-- | A `FromColumnValue` constraint lifts the `FromValue` parser
265265-- to a decoding of a @(Symbol, ColumnType)@ to a `Type`,