|
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: 1536 (0x600) Types: TextFile Names: »printfinp«
└─⟦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⟧
<se *< *pl 297,21,240,13,4* *pn 0,0**lw 170* *ld 12* *ps* *qr* 1980-10-24 Anders Lindgård *nl1* *ct* integer procedure printfile *nl1* *rj**np* Sends a message to the PRIMO module to print the file "file" on the printer "printer". Default printer is "lp" *nl2* Call: printfile(printer,file)*nl* *lm55* *mt 1, printfile**cm 6 spaces*(return value, integer). *sj*Result of the operation. printfile>0 : transport number printfile<0 : error *rj* *mt 1, printer*(call value, string). The name of a filedescriptor describing the printer or the empty string <::> in which case <:lp:> is used. *nl* *mt 1, file*(call value, string). The name of the file to be printed. *lm0* *nl1**np* In case of an error an warning is written on the zone out, but the program is not terminated. *lm0**nl4* *ns 1,2,Language: ALGOL* ---------*nl* *ns 1,2,Maintenance level: user* ------------------*nl* *ef* ▶EOF◀