handle parameter status responses in postgres

alxbnct · Jan 10, 2022 · 2560a23 · 2560a23
1 parent 3dd0d03
commit 2560a23
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/std/db/postgresql-driver.ss b/src/std/db/postgresql-driver.ss
@@ -275,6 +275,9 @@
       (['NoticeResponse msg . irritants]
        (notice! msg irritants)
        (recv!))
+      (['ParameterStatus msg . irritants]
+       (void)
+       (recv!))
       (msg msg)))
 
   (def (notice! msg irritants)