*** empty log message ***
[h316.git] / bin / frtn
index a7a8fa65e55c03af4d1d2769bcabda486323fa97..42a6ce8a3f87c25f010f2d6860a05d073f726737 100755 (executable)
--- 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 <<EOF
-rest $H316/sys/frtn.sys" > $name.go
+rest $H316/sys/frtn.sys
 r
 at ptr $name.par
 at ptp $name.obj