From 00a4196139ab15110c5e46e1002fe7ad523250d8 Mon Sep 17 00:00:00 2001
From: Bruce Momjian <bruce@momjian.us>
Date: Sat, 17 Apr 1999 17:18:41 +0000
Subject: [PATCH] Add res checking to libpq examples, from Dan Merillat.

---
 doc/src/sgml/libpq.sgml | 14 +++++++-------
 src/man/libpq.3         | 16 ++++++++--------
 2 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/doc/src/sgml/libpq.sgml b/doc/src/sgml/libpq.sgml
index 19c73502094..cbde3387fc3 100644
--- a/doc/src/sgml/libpq.sgml
+++ b/doc/src/sgml/libpq.sgml
@@ -1600,7 +1600,7 @@ main()
 
     /* start a transaction block */
     res = PQexec(conn, "BEGIN");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "BEGIN command failed\n");
         PQclear(res);
@@ -1618,7 +1618,7 @@ main()
      * databases
      */
     res = PQexec(conn, "DECLARE mycursor CURSOR FOR select * from pg_database");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "DECLARE CURSOR command failed\n");
         PQclear(res);
@@ -1626,7 +1626,7 @@ main()
     }
     PQclear(res);
     res = PQexec(conn, "FETCH ALL in mycursor");
-    if (PQresultStatus(res) != PGRES_TUPLES_OK)
+    if (!res || PQresultStatus(res) != PGRES_TUPLES_OK)
     {
         fprintf(stderr, "FETCH ALL command didn't return tuples properly\n");
         PQclear(res);
@@ -1742,7 +1742,7 @@ main()
     }
 
     res = PQexec(conn, "LISTEN TBL2");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "LISTEN command failed\n");
         PQclear(res);
@@ -1871,7 +1871,7 @@ main()
 
     /* start a transaction block */
     res = PQexec(conn, "BEGIN");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "BEGIN command failed\n");
         PQclear(res);
@@ -1889,7 +1889,7 @@ main()
      * databases
      */
     res = PQexec(conn, "DECLARE mycursor BINARY CURSOR FOR select * from test1");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "DECLARE CURSOR command failed\n");
         PQclear(res);
@@ -1898,7 +1898,7 @@ main()
     PQclear(res);
 
     res = PQexec(conn, "FETCH ALL in mycursor");
-    if (PQresultStatus(res) != PGRES_TUPLES_OK)
+    if (!res || PQresultStatus(res) != PGRES_TUPLES_OK)
     {
         fprintf(stderr, "FETCH ALL command didn't return tuples properly\n");
         PQclear(res);
diff --git a/src/man/libpq.3 b/src/man/libpq.3
index fe9720322d6..064d33b80e8 100644
--- a/src/man/libpq.3
+++ b/src/man/libpq.3
@@ -1,6 +1,6 @@
 .\" This is -*-nroff-*-
 .\" XXX standard disclaimer belongs here....
-.\" $Header: /cvsroot/pgsql/src/man/Attic/libpq.3,v 1.25 1998/10/14 05:31:50 momjian Exp $
+.\" $Header: /cvsroot/pgsql/src/man/Attic/libpq.3,v 1.26 1999/04/17 17:18:41 momjian Exp $
 .TH LIBPQ INTRO 08/08/98 PostgreSQL PostgreSQL
 .SH DESCRIPTION
 Current documentation for this topic is available in the new Programmer's Guide
@@ -975,7 +975,7 @@ main()
 
     /* start a transaction block */
     res = PQexec(conn, "BEGIN");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "BEGIN command failed\\n");
         PQclear(res);
@@ -993,7 +993,7 @@ main()
      * databases
      */
     res = PQexec(conn, "DECLARE mycursor CURSOR FOR select * from pg_database");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "DECLARE CURSOR command failed\\n");
         PQclear(res);
@@ -1002,7 +1002,7 @@ main()
     PQclear(res);
 
     res = PQexec(conn, "FETCH ALL in mycursor");
-    if (PQresultStatus(res) != PGRES_TUPLES_OK)
+    if (!res || PQresultStatus(res) != PGRES_TUPLES_OK)
     {
         fprintf(stderr, "FETCH ALL command didn't return tuples properly\\n");
         PQclear(res);
@@ -1115,7 +1115,7 @@ main()
     }
 
     res = PQexec(conn, "LISTEN TBL2");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "LISTEN command failed\\n");
         PQclear(res);
@@ -1239,7 +1239,7 @@ main()
 
     /* start a transaction block */
     res = PQexec(conn, "BEGIN");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "BEGIN command failed\\n");
         PQclear(res);
@@ -1257,7 +1257,7 @@ main()
      * databases
      */
     res = PQexec(conn, "DECLARE mycursor BINARY CURSOR FOR select * from test1");
-    if (PQresultStatus(res) != PGRES_COMMAND_OK)
+    if (!res || PQresultStatus(res) != PGRES_COMMAND_OK)
     {
         fprintf(stderr, "DECLARE CURSOR command failed\\n");
         PQclear(res);
@@ -1266,7 +1266,7 @@ main()
     PQclear(res);
 
     res = PQexec(conn, "FETCH ALL in mycursor");
-    if (PQresultStatus(res) != PGRES_TUPLES_OK)
+    if (!res || PQresultStatus(res) != PGRES_TUPLES_OK)
     {
         fprintf(stderr, "FETCH ALL command didn't return tuples properly\\n");
         PQclear(res);
-- 
GitLab