system/multiuser/1.7.5/src/print cmd


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

 
PACKET print cmd DEFINES print, printer : 
 
PROC print :

  print (last param)

ENDPROC print ;

PROC print (TEXT CONST file name) :

  save (file name, task ("PRINTER")) ; 
 
ENDPROC print ;

PROC print (THESAURUS CONST nameset) :

  do (PROC (TEXT CONST) print, nameset)

ENDPROC print ;

TASK PROC printer :

  task ("PRINTER")

ENDPROC printer ;

ENDPACKET print cmd ;