2 # FORTRAN IV compiler wrapper for simh h316
5 echo "Argument missing!"
12 cat $1 | tab | paron
> $name.par
17 rest $H316/sys/frtn.sys
34 h316
$name.go
> /dev
/null
38 if cat $name.lst |
egrep "[*]{36,40}">/dev
/null
2>&1; then
40 echo -e "\n\nFORTRAN IV compilation FAILED!"
48 echo "FORTRAN IV compilation successfull."