X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=bin%2Ffrtn;h=42a6ce8a3f87c25f010f2d6860a05d073f726737;hb=8916110d486031fb2c43a767bc663194f3370668;hp=a7a8fa65e55c03af4d1d2769bcabda486323fa97;hpb=30773ad6a7189c3d7f50ce2a9ca2f2db228f619a;p=h316.git diff --git a/bin/frtn b/bin/frtn index a7a8fa6..42a6ce8 100755 --- a/bin/frtn +++ b/bin/frtn @@ -2,7 +2,7 @@ # FORTRAN IV compiler wrapper for simh h316 if [ ! $1 ] ; then - echo "Argument mssing!" + echo "Argument missing!" exit 2 fi @@ -14,7 +14,7 @@ rm -f $name.lst rm -f $name.obj cat > $name.go < $name.go +rest $H316/sys/frtn.sys r at ptr $name.par at ptp $name.obj