|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2304 (0x900) Types: TextFile Names: »compdes«
└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ. Detaljer om "HC8000" projekt. └─⟦0364f57e3⟧ └─⟦8c6b0f8fa⟧ »cdes« └─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ. └─⟦4334b4c0b⟧ └─⟦8c6b0f8fa⟧ »cdes« └─⟦this⟧
mode list.yes lookup compdes message version 1980.10.13 lkj=lookup docmoveinp extractinp macroinp mtreadinp remspinp, describeinp searchcinp writestdinp if ok.no contract from.cdes algollibman=set 35 global algollibman compalghead=set 10 compalghead=edit compfphead l./programlib/,r/program/algol8/, l1,d,i/ General procedures /, l1,r/fp/algol/, l./80/,r/8/7/, l./ programs /,r/programs/algol8 procedures/, l./programs/,r/programs/procedures/, l./*ef*/,l-1,i/ boolean procedure cleararea boolean procedure disccopy procedure outshortcl integer procedure printfile integer procedure readparam integer procedure writestdent /, f alginp1=set 50 alginp1=edit compalghead careainp , disccopyinp, outshclinp, printfinp, readparinp, wrstdeinp l./*ef*/,s2,d1, l./*ef*/,s3,d1, l./*ef*/,s4,d1, l./*ef*/,s5,d1, l./*ef*/,s6,d1, l./*ef*/,s7,d1, f algollibman=compose alginp1 head 1 fplibman=set 35 global fplibman fpinp1=set 50 compfp1head=set 10 compfp1head=edit compfphead l./*ef*/,l-1,i/ convert device describe docmove extract listint m macro mtread multicopy remsp searchcon stdvar testbuf writestd /, l1,d, f fpinp1=edit compfp1head , convertinp, deviceinp, describeinp, docmoveinp, extractinp, listintinp macroinp, mtreadinp, multicopinp , remspinp, searchcinp stdvarinp , testbufinp writestdinp; l./*ef*/,r/ef/ps0/,l1,s2,d1, l./*ef*/,r/ef/ps0/,l1,s3,d1, l./*ef*/,r/ef/ps0/,l1,s4,d1, l./*ef*/,r/ef/ps0/,l1,s5,d1, l./*ef*/,r/ef/ps0/,l1,s6,d1, l./*ef*/,r/ef/ps0/,l1,s7,d1, l./*ef*/,r/ef/ps0/,l1,s8,d1, l./*ef*/,r/ef/ps0/,l1,s9,d1, l./*ef*/,r/ef/ps0/,l1,s10,d1, l./*ef*/,r/ef/ps0/,l1,s11,d1, l./*ef*/,r/ef/ps0/,l1,s12,d1, l./*ef*/,r/ef/ps0/,l1,s13,d1, l./*ef*/,r/ef/ps0/,l1,s14,d1, l./*ef*/,r/ef/ps0/,l1,s15,d1, f fplibman=compose fpinp1 head 1 c=copy message.no algollibman fplibman head 1 c=copy message.no compdes head 1 mode list.no finisb ▶EOF◀