Update of /project/pg/cvsroot/pg In directory common-lisp.net:/tmp/cvs-serv9466
Modified Files: v3-protocol.lisp Log Message: fixed extended queries for newer versions of postgreSQL, they need the sync message Date: Mon Sep 20 00:13:35 2004 Author: pvaneynde
Index: pg/v3-protocol.lisp diff -u pg/v3-protocol.lisp:1.13 pg/v3-protocol.lisp:1.14 --- pg/v3-protocol.lisp:1.13 Fri Aug 13 18:50:37 2004 +++ pg/v3-protocol.lisp Mon Sep 20 00:13:35 2004 @@ -938,6 +938,10 @@ #\C `((:char ,type) (:cstring ,name))) + ;; make it a sync point + (send-packet connection + #\S + nil) (%flush connection) (loop :for packet = (read-packet connection) :do