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
22 cat > $locname.go
<<EOF
23 rest $H316/sys/super3.sys
30 for library
in $LIBS; do
31 if [ ! -e "$library" ]; then
32 echo "Error: $library not found!"
35 echo "at ptr $library" >> $locname.go
36 echo "go" >> $locname.go
39 cat >> $locname.go
<<EOF
40 !echo -e "\n************************"
42 ! echo -e "\n************************"