Update of /project/pg/cvsroot/pg In directory clnet:/tmp/cvs-serv8237

Modified Files: v3-protocol.lisp Log Message: Remove the limit on maximum message size when using the v3 protocol (from Johan Ur Riise johan@riise-data.no).

--- /project/pg/cvsroot/pg/v3-protocol.lisp 2006/09/18 21:37:48 1.22 +++ /project/pg/cvsroot/pg/v3-protocol.lisp 2006/09/19 06:57:28 1.23 @@ -640,9 +640,6 @@ on the database to which we are connected via CONNECTION. Return a result structure which can be decoded using `pg-result'." (let ((sql (apply #'concatenate 'simple-string args))) - (when (> (length sql) +MAX_MESSAGE_LEN+) - (error "SQL statement too long: ~A" sql)) - (send-packet connection #\Q `((:cstring ,sql))) (%flush connection) (do-followup-query connection)))