From 4baf145c50e583f19e8a26ad1238609cfa2d1a03 Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Fri, 12 Jan 2001 22:01:27 +0000
Subject: [PATCH] Added extern "C" for dset and drvet.

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

diff --git a/src/registry/registerRecordDeviceDriver.pl b/src/registry/registerRecordDeviceDriver.pl
index b90a8b49c..b520146d7 100755
--- a/src/registry/registerRecordDeviceDriver.pl
+++ b/src/registry/registerRecordDeviceDriver.pl
@@ -76,7 +76,7 @@ if($numberRecordType>0) {
 #definitions for device
 if($numberDeviceSupport>0) {
     for ($i=0; $i<$numberDeviceSupport; $i++) {
-        print "extern struct dset $deviceSupport[$i];\n";
+        print "extern \"C\" struct dset $deviceSupport[$i];\n";
     }
     print "\nstatic const char * const deviceSupportNames[$numberDeviceSupport] = {\n";
     for ($i=0; $i<$numberDeviceSupport; $i++) {
@@ -98,7 +98,7 @@ if($numberDeviceSupport>0) {
 #definitions for driver
 if($numberDriverSupport>0) {
     for ($i=0; $i<$numberDriverSupport; $i++) {
-        print "extern struct drvet $driverSupport[$i];\n";
+        print "extern \"C\" struct drvet $driverSupport[$i];\n";
     }
     print "\nstatic char *driverSupportNames[$numberDriverSupport] = {\n";
     for ($i=0; $i<$numberDriverSupport; $i++) {