Changeset 3115 for trunk/psLib/test/runTest

Timestamp:

Feb 2, 2005, 2:54:13 PM (21 years ago)

Author:

desonia

Message:

Added SWIG and autoconf.

File:

• trunk/psLib/test/runTest (modified) (4 diffs)

trunk/psLib/test/runTest

@@ -18 +18 @@
 #                 0    Test run successfull and all tests passed
 #                 1    Verified directory did not exist
-#                 2    Verified STDOUT file did not exist
-#                 4    Verified STDERR file did not exist
 #                 8    STDOUT files did not compare
 #                16    STDERR files did not compare
@@ -30 +28 @@
 #
 #  $Revison:  $  $Name: not supported by cvs2svn $
-#  $Date: 2004-12-16 21:32:39 $
+#  $Date: 2005-02-03 00:54:12 $
 #
 #  Copyright 2004 Maui High Performance Computering Center, University of Hawaii
@@ -62 +60 @@
 
 # Set up the PSLIB_ROOT environment variable if the user doesn't have it set
-if ( !$ENV{'PSLIB_ROOT'} ) {
-
-    # Use the directory directly above test
-    $PSLIB_ROOT = `cd ..;pwd`;
-
-    # Remove newline for the end of path returned
-    chomp($PSLIB_ROOT);
-
-    # Set the environment variable
-    $ENV{'PSLIB_ROOT'} = $PSLIB_ROOT;
-
-    # Display message that PSLIB_ROOT not found and set to
-    print("PSLIB_ROOT not found: set to $PSLIB_ROOT\n");
-}
-
-# Add PSLIB_ROOT/lib to LD_LIBRARY_PATH and DYLD_LIBRARY_PATH environment vars
-$ENV{'LD_LIBRARY_PATH'}   = "$ENV{'PSLIB_ROOT'}/lib:$ENV{'LD_LIBRARY_PATH'}";
-$ENV{'DYLD_LIBRARY_PATH'} = "$ENV{'PSLIB_ROOT'}/lib:$ENV{'DYLD_LIBRARY_PATH'}";
+if ( $ENV{'PSLIB_ROOT'} ) {
+
+        # Add PSLIB_ROOT/lib to LD_LIBRARY_PATH and DYLD_LIBRARY_PATH environment vars
+        $ENV{'LD_LIBRARY_PATH'}   = "$ENV{'PSLIB_ROOT'}/lib:$ENV{'LD_LIBRARY_PATH'}";
+        $ENV{'DYLD_LIBRARY_PATH'} = "$ENV{'PSLIB_ROOT'}/lib:$ENV{'DYLD_LIBRARY_PATH'}";
+}
 
 # Loop through the arguements passed to the script
@@ -337 +323 @@
         # Display message to user that verified STDOUT file doesn't exist
         print("        File $streamFile doesn't exist.\n");
-
-        # Set exit value bit 1 to indicate proper failure
-        if ( $streamFile =~ /out$/ ) {
-            $returnVal |= 2;
-        }
-        elsif ( $streamFile =~ /err$/ ) {
-            $returnVal |= 4;
-        }
     }
     else {