2 # FORTRAN IV simple loading routine
5 echo "Argument missing!"
10 locname
=`basename $1 .obj`
15 LIBS
="$H316/lib/fortran/lib/flib1.lib\
16 $H316/lib/fortran/lib/flib2.lib\
17 $H316/lib/fortran/lib/flib3.lib\
18 $H316/lib/iolib/lib/io.lib\
21 cat > $locname.go
<<EOF
22 rest $H316/sys/super2.sys
29 for library
in $LIBS; do
30 if [ ! -e "$library" ]; then
31 echo "Error: $library not found!"
34 echo "at ptr $library" >> $locname.go
35 echo "go" >> $locname.go
38 cat >> $locname.go
<<EOF
40 !echo -e "\n************************"
42 ! echo -e "\n************************"