*** empty log message ***

[h316.git] / bin / fload

diff --git a/bin/fload b/bin/fload
index f94bc6e11b177bead7d0b2dc66a5c5db048a537a..ca69753bff1be367a403c0d075b50e22efb5f65b 100755 (executable)
--- a/bin/fload
+++ b/bin/fload
@@ -18,10 +18,11 @@ LIBS="$H316/lib/fortran/lib/flib1.lib\
        $H316/lib/iolib/lib/io.lib\
 "
 
+
 cat > $locname.go <<EOF
 rest $H316/sys/super3.sys
 at ptr $objname
-go 36000
+run 36000
 go
 e p
 EOF
@@ -33,11 +34,15 @@ for library in $LIBS; do
     fi
     echo "at ptr $library" >> $locname.go
     echo "go" >> $locname.go
+    echo "! echo loading $library" >> $locname.go
 done
 
 cat >> $locname.go <<EOF
-r
 ! echo -e "\n************************"
+run 36002
+! echo -e "\n************************"
+set cpu history=65536
+set break 0-17
 EOF
     
 #cat $locname.go