postgres backend: package deadlock-detected-error into the cl-rdbms condition type
Thu Jul 23 08:45:32 PDT 2009 attila.lendvai@gmail.com
* postgres backend: package deadlock-detected-error into the cl-rdbms condition type
Warning: CRC errors found. These are probably harmless but should be repaired.
See 'darcs gzcrcs --help' for more information.
diff -rN -u old-cl-rdbms/postgresql/postmodern-backend.lisp new-cl-rdbms/postgresql/postmodern-backend.lisp
--- old-cl-rdbms/postgresql/postmodern-backend.lisp 2014-08-01 19:28:22.000000000 -0700
+++ new-cl-rdbms/postgresql/postmodern-backend.lisp 2014-08-01 19:28:22.000000000 -0700
@@ -109,7 +109,9 @@
(handler-case
(apply #'execute-postmodern-prepared-statement connection statement-name args)
(cl-postgres-error:lock-not-available (error)
- (unable-to-obtain-lock-error error)))))
+ (unable-to-obtain-lock-error error))
+ (cl-postgres-error:deadlock-detected (error)
+ (deadlock-detected-error error)))))
(defmethod execute-command ((db postgresql-postmodern) (tr postgresql-postmodern-transaction) (prepared-statement prepared-statement)
&rest args)