*** empty log message ***
[h316.git] / bin / frun
index 3816857ca6ec8ec0c3a52fe3dae20fd77c6c40ff..0660bfe7233900155aef56b3bf5c8735d03cb69c 100755 (executable)
--- a/bin/frun
+++ b/bin/frun
@@ -6,18 +6,25 @@ if [ ! $1 ] ; then
     exit 2
 fi
 
+
+if [ ! "$H316" ]; then
+    echo "H316 variable not set!"
+    exit 2
+fi
+
+if [ ! -e "$H316/config/libs.config" ]; then
+    echo "H316/config/libs.config not found!"
+    exit 2
+else
+    source "$H316/config/libs.config"
+fi
+
 objname=$1
 locname=`basename $1 .obj`
 
 echo $locname
 echo $objname
 
-LIBS="$H316/lib/fortran/lib/flib1.lib\
-       $H316/lib/fortran/lib/flib2.lib\
-       $H316/lib/fortran/lib/flib3.lib\
-       $H316/lib/iolib/lib/io.lib\
-"
-
 cat > $locname.go <<EOF
 rest $H316/sys/super2.sys
 at ptr $objname
@@ -26,7 +33,7 @@ go
 e p
 EOF
 
-for library in $LIBS; do
+for library in $LOAD_LIBS; do
     if [ ! -e "$library" ]; then
        echo "Error: $library not found!"
        exit 3;