github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-05-02 22:33:27 +00:00
Code Issues Releases Wiki Activity

Added files and directories that support the MDL 55 runtime.

Browse Source
This commit is contained in:
Eric Swenson
2023-02-27 16:17:12 -08:00
parent e6cc51f558
commit d65e766017
647 changed files with 84263 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
bin/librm2/evil.fbin Normal file
View File

@@ -0,0 +1,16 @@
'<PCODE "EVIL">
<PACKAGE "EVIL">
<ENTRY EVIL GET-TTY>
<SETG EVIL %<RSUBR!- '[ %<PCODE!- "EVIL" 0> EVIL #DECL ("VALUE" <OR FALSE
STRING> "ARGS" ANY) GET-TTY "PRINT" "JUNK >" OUTCHAN (CHANNEL) "DONE"]>>
<AND <ASSIGNED? GLUE> .GLUE <PUT ,EVIL GLUE ![4379120709 68222721 30316445953
4294967296 4651495168 1141391360 0 15 262157!]>>
<SETG GET-TTY %<RSUBR!- '[ %<PCODE!- "EVIL" 116> GET-TTY #DECL ("VALUE" ANY) T
]>>
<ENDPACKAGE>