From a7b06a758837b41e50d870d634628b613c12809e Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Wed, 17 Oct 2001 20:44:18 +0000
Subject: [PATCH] Added read of RELEASE.<EPICS_HOST_ARCH> file.

---
 src/makeBaseApp/makeBaseApp.pl | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/makeBaseApp/makeBaseApp.pl b/src/makeBaseApp/makeBaseApp.pl
index 227df63d0..547b3b5dd 100755
--- a/src/makeBaseApp/makeBaseApp.pl
+++ b/src/makeBaseApp/makeBaseApp.pl
@@ -16,6 +16,9 @@ $app_top  = cwd();
 
 &GetUser;		# Ensure we know who's in charge
 &readRelease("configure/RELEASE", \%release, \@apps) if (-r "configure/RELEASE");
+&readRelease("configure/RELEASE.$ENV{EPICS_HOST_ARCH}", \%release, \@apps)
+   if (-r "configure/RELEASE.$ENV{EPICS_HOST_ARCH}");
+&expandRelease(\%release, \@apps);
 &get_commandline_opts;	# Check command-line options
 
 #
@@ -272,6 +275,11 @@ sub readRelease {
 	&readRelease($path, $Rmacros, $Rapps) if (-r $path);
     }
     close IN;
+}
+
+sub expandRelease {
+    my ($Rmacros, $Rapps) = @_;
+    # $Rmacros is a reference to a hash, $Rapps a ref to an array
     
     # Expand any (possibly nested) macros that were defined after use
     while (($macro, $path) = each %$Rmacros) {