b8675f1138254335bee8ec85e1653d8a983c4a4e
2 # FORTRAN IV simple executor
9 name
=`basename $1 .obj`
11 LIBS
= $H316/lib
/fortran
/fort.lib\
12 $H316/lib
/iolib
/io.lib\
13 $H316/lib
/fortran
/custom.lib
15 echo "rest $H316/sys/super2.sys" > $name.go
16 echo "at ptr $name.obj" >> $name.go
20 for library
in $LIBS; do
21 if [ ! -e $library]; then
22 echo "Error: $library not found!"
25 echo "at ptr $library" >> $name.go
29 echo "! echo -e \"\\n************************\"" >> $name.go
30 echo "run 1000" >> $name.go
31 echo "! echo -e \"************************\"" >> $name.go
32 echo "quit" >> $name.go