ViewVC Help

View File | Revision Log | Show Annotations | Root Listing

root/cvsroot/COMP/SCRAM/src/Utilities/setarchitecture.pm

Comparing COMP/SCRAM/src/Utilities/setarchitecture.pm (file contents):
Revision 1.2 by williamc, Mon Mar 1 11:01:36 1999 UTC vs.
Revision 1.5 by williamc, Fri Mar 26 17:14:15 1999 UTC

#	Line 11 | Line 11 | require Exporter;
11		sub setarch {
12		$uname=`uname -a`;
13		($OSname, $hostname, $OSversion, @rest) = split / /, $uname;
14	+	#
15	+	# SunOS -
16	+	#
17	+	if ( $OSname=~SunOS ) {
18	+	$OSversion=~s/^(.\..)\..*/\1/; #Retain only the first two version digits
19	+	}
20		# simply set to OS type and version
21		$ENV{SCRAM_ARCH}="${OSname}__${OSversion}";
22	<	print "Setting Architecture to $ENV{SCRAM_ARCH}\n";
22	>	#print "Setting Architecture to $ENV{SCRAM_ARCH}\n";
23		}

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines