summaryrefslogtreecommitdiff
path: root/system/multiuser/1.7.5/src/print cmd
diff options
context:
space:
mode:
Diffstat (limited to 'system/multiuser/1.7.5/src/print cmd')
-rw-r--r--system/multiuser/1.7.5/src/print cmd29
1 files changed, 29 insertions, 0 deletions
diff --git a/system/multiuser/1.7.5/src/print cmd b/system/multiuser/1.7.5/src/print cmd
new file mode 100644
index 0000000..1fcb475
--- /dev/null
+++ b/system/multiuser/1.7.5/src/print cmd
@@ -0,0 +1,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 ;
+