From 5a290321687f454f04e5733b04e2859aa3721261 Mon Sep 17 00:00:00 2001
From: Jeff Hill <johill@lanl.gov>
Date: Tue, 13 Jun 2000 01:04:34 +0000
Subject: [PATCH] clear channel to avoid disconnect warning

---
 src/util/ca_test.c | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/util/ca_test.c b/src/util/ca_test.c
index 935349321..e7c018fa6 100644
--- a/src/util/ca_test.c
+++ b/src/util/ca_test.c
@@ -106,6 +106,7 @@ LOCAL int cagft(char *pname)
 	SEVCHK(status,NULL);
 	status = ca_pend_io(2.0);
 	if(status != ECA_NORMAL){
+        SEVCHK(ca_clear_channel(chan_id),NULL);
 		printf("Not Found %s\n", pname);
 		return -1;
 	}
@@ -148,6 +149,7 @@ LOCAL int cagft(char *pname)
 		ca_pend_event (5.0);
 
 		if(!outstanding){
+            SEVCHK(ca_clear_channel(chan_id),NULL);
 			printf("\n\n");
 			return 0;
 		}
@@ -157,6 +159,7 @@ LOCAL int cagft(char *pname)
 		}
 	}
 
+    SEVCHK(ca_clear_channel(chan_id),NULL);
 	return -1;
 }
 
@@ -216,6 +219,7 @@ char		*pvalue
 	SEVCHK(status,NULL);
 	status = ca_pend_io(2.0);
 	if(status != ECA_NORMAL){
+        SEVCHK(ca_clear_channel(chan_id),NULL);
 		printf("Not Found %s\n", pname);
 		return -1;
 	}
@@ -304,6 +308,7 @@ skip_rest:
 		ca_pend_event(1.0);
 
 		if(!outstanding){
+            SEVCHK(ca_clear_channel(chan_id),NULL);
 			printf("\n\n");
 			return 0;
 		}
@@ -311,6 +316,7 @@ skip_rest:
 		ntries--;
 	}
 
+    SEVCHK(ca_clear_channel(chan_id),NULL);
 	return -1;
 }