projects
/
h316.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
*** empty log message ***
[h316.git]
/
bin
/
fload
diff --git
a/bin/fload
b/bin/fload
index 351f8d81eb66aa7695c79419c2d5d8061bd37c5b..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\
"
$H316/lib/iolib/lib/io.lib\
"
+
cat > $locname.go <<EOF
cat > $locname.go <<EOF
-rest $H316/sys/super
2
.sys
+rest $H316/sys/super
3
.sys
at ptr $objname
at ptr $objname
-
go
36000
+
run
36000
go
e p
EOF
go
e p
EOF
@@
-33,13
+34,15
@@
for library in $LIBS; do
fi
echo "at ptr $library" >> $locname.go
echo "go" >> $locname.go
fi
echo "at ptr $library" >> $locname.go
echo "go" >> $locname.go
+ echo "! echo loading $library" >> $locname.go
done
cat >> $locname.go <<EOF
done
cat >> $locname.go <<EOF
-r
-!echo -e "\n************************"
- run 36002
! echo -e "\n************************"
! echo -e "\n************************"
+run 36002
+! echo -e "\n************************"
+set cpu history=65536
+set break 0-17
EOF
#cat $locname.go
EOF
#cat $locname.go