mirror of
https://github.com/PDP-10/its.git
synced 2026-04-25 20:01:40 +00:00
Added lots of lisp libraries, most of them built from source.
This partially completes #251.
This commit is contained in:
@@ -656,6 +656,7 @@ respond "*" ":link sys;atsign lisp,sys;purqio >\r"
|
||||
respond "*" ":link sys;ts l,sys;ts lisp\r"
|
||||
|
||||
respond "*" ":link .info.;lisp step,.info.;step info\r"
|
||||
respond "*" ":link libdoc;struct 280,alan;struct >\r"
|
||||
respond "*" ":link libdoc;struct doc,alan;struct doc\r"
|
||||
respond "*" ":link .info.;lisp struct,libdoc;struct doc\r"
|
||||
respond "*" ":link l;-read- -this-,lisp;-read- -this-\r"
|
||||
@@ -690,6 +691,7 @@ respond "*" ":link sys;.fasl defs,lisp;.fasl defs\r"
|
||||
respond "*" ":midas inquir;_lsrrtn\r"
|
||||
expect ":KILL"
|
||||
respond "*" ":link liblsp;debug fasl,liblsp;dbg fasl\r"
|
||||
respond "*" ":link lisp;debug fasl,liblsp;debug fasl\r"
|
||||
respond "*" "complr\013"
|
||||
respond "_" "liblsp;_libdoc;tty\r"
|
||||
respond "_" "inquir;reader\r"
|
||||
@@ -702,11 +704,13 @@ respond "_" "lisp;_nilcom;evonce\r"
|
||||
respond "_" "inquir;inquir\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" "complr\013"
|
||||
respond "_" "liblsp;_libdoc;dbg rwk1\r"
|
||||
respond "_" "liblsp;_libdoc;comrd kmp1\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" ":lisp inquir;inquir (dump)\r"
|
||||
respond "*" ":link inquir;ts inquir,inquir;inqbin >\r"
|
||||
respond "*" ":link sys;ts inquir,inquir;ts inquir\r"
|
||||
@@ -759,8 +763,89 @@ respond "*" ":link sys1;ts s,sys;ts send\r"
|
||||
respond "*" ":link sys3;ts snd,sys;ts send\r"
|
||||
respond "*" ":link sys3;ts sned,sys;ts send\r"
|
||||
|
||||
# NICNAM
|
||||
# more lisp packages
|
||||
respond "*" ":link lisp;tty fasl,liblsp;tty fasl\r"
|
||||
respond "*" "complr\013"
|
||||
respond "_" "\007"
|
||||
respond "*" "(load '((lisp) subloa lsp))"
|
||||
respond "T" "(maklap)"
|
||||
respond "_" "lisp;_lspsrc;funcel\r"
|
||||
respond "_" "lisp;_lspsrc;bits\r"
|
||||
respond "_" "lisp;_lspsrc;reap\r"
|
||||
respond "_" "lisp;_lspsrc;lexprf\r"
|
||||
respond "_" "lisp;_lspsrc;ldbhlp\r"
|
||||
respond "_" "lisp;_nilcom;subloa\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" "complr\013"
|
||||
respond "_" "lisp;_nilcom;sharpa\r"
|
||||
respond "_" "lisp;_nilcom;sharpc\r"
|
||||
respond "_" "lisp;_nilcom;lsets\r"
|
||||
respond "_" "lisp;_nilcom;drammp\r"
|
||||
respond "(Y or N)" "Y"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" "complr\013"
|
||||
respond "_" "\007"
|
||||
respond "*" "(load '((lisp) subloa lsp))"
|
||||
respond "T" "(maklap)"
|
||||
respond "_" "lisp;_lspsrc;nilaid\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" "complr\013"
|
||||
respond "_" "lisp;_libdoc;sharab\r"
|
||||
respond "_" "lisp;_libdoc;bs\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" "complr\013"
|
||||
respond "_" "\007"
|
||||
respond "*" "(load '((lisp) subloa lsp))"
|
||||
respond "T" "(maklap)"
|
||||
respond "_" "lisp;_nilcom;thread\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
|
||||
respond "*" ":midas lisp;_l;lchnsp\r"
|
||||
expect ":KILL"
|
||||
respond "*" ":midas lisp;_l;purep\r"
|
||||
expect ":KILL"
|
||||
|
||||
# struct
|
||||
|
||||
respond "*" ":link alan;dprint fasl,liblsp;dprint fasl\r"
|
||||
respond "*" ":link alan;struct 9,alan;nstruc 280\r"
|
||||
respond "*" ":copy liblsp;struct fasl,alan;struct boot\r"
|
||||
respond "*" ":link alan;struct fasl,liblsp;struct fasl\r"
|
||||
respond "*" "complr\013"
|
||||
respond "_" "alan;lspcom\r"
|
||||
respond "_" "alan;lspenv\r"
|
||||
respond "_" "alan;lspint\r"
|
||||
respond "_" "alan;setf\r"
|
||||
respond "_" "alan;binda\r"
|
||||
respond "_" "alan;crawl\r"
|
||||
respond "_" "alan;nstruc 280\r"
|
||||
respond "_" "\032"
|
||||
type ":kill\r"
|
||||
respond "*" ":copy alan;nstruc fasl,liblsp;struct fasl\r"
|
||||
respond "*" ":link lisp;struct fasl,liblsp;struct fasl\r"
|
||||
|
||||
respond "*" ":midas liblsp;_alan;macits\r"
|
||||
expect ":KILL"
|
||||
|
||||
#respond "*" "complr\013"
|
||||
#respond "_" "alan;ljob\r"
|
||||
#respond "_" "liblsp;_libdoc;gprint rcw3\r"
|
||||
#respond "_" "alan;lspgub\r"
|
||||
##source file is damaged
|
||||
##respond "_" "alan;dprint\r"
|
||||
#respond "_" "\032"
|
||||
#type ":kill\r"
|
||||
|
||||
# NICNAM
|
||||
respond "*" ":midas sys2;ts nicnam_sysen3;nicnam\r"
|
||||
expect ":KILL"
|
||||
|
||||
|
||||
Reference in New Issue
Block a user