Merge pull request #67 from mefyl/master

Fix postgresql backend option detection.
paurkedal · Apr 18, 2021 · 74317cd · 74317cd
2 parents bccdbe3 + cbf41af
commit 74317cd
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib-driver/caqti_driver_postgresql.ml b/lib-driver/caqti_driver_postgresql.ml
@@ -385,7 +385,7 @@ let rec decode_row'
    | Caqti_type.Option t -> fun j ->
       let j' = j + Caqti_type.length t in
       let rec null_only k = k = j' ||
-        (resp#getisnull i j && null_only (k + 1)) in
+        (resp#getisnull i k && null_only (k + 1)) in
       if null_only j then Ok (j', None) else
       (match decode_row' ~uri row t j with
        | Ok (j'', y) -> assert (j' = j''); Ok (j'', Some y)