From f973722d5a93051a6dff4fdd0208b8f2930cbe23 Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Tue, 5 Aug 2003 18:03:31 +0000
Subject: [PATCH] suppress warning mesage if no record/device/driver support

---
 src/registry/registerRecordDeviceDriver.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/registry/registerRecordDeviceDriver.pl b/src/registry/registerRecordDeviceDriver.pl
index b845b970c..8c65d364b 100755
--- a/src/registry/registerRecordDeviceDriver.pl
+++ b/src/registry/registerRecordDeviceDriver.pl
@@ -167,9 +167,10 @@ if (@variables) {
 print << "END" ;
 int $subname(DBBASE *pbase)
 {
-    int i;
-
 END
+if($numberRecordType>0 || $numberDeviceSupport>0 || $numberDriverSupport>0) {
+    print "    int i;\n";
+}
 if($numberRecordType>0) {
     print << "END" ;
     for(i=0; i< $numberRecordType;  i++ ) {