system/std.zusatz/1.7.3/src/std printer generator-M


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

forget ("std printer generator/M", quiet) ;
check off ;

fetch ("minimal fonts routines", archive); 
fetch ("std printer", archive); 
fetch ("eumel printer", archive);
fetch ("elan lister", archive);
fetch ("spool manager", archive);
fetch ("printer/M", archive); 
 
ins ("minimal fonts routines"); 
ins ("std printer"); 
ins ("eumel printer");
ins ("elan lister");
ins ("spool manager");
run ("printer/M");
 
PROC ins (TEXT CONST name): 
  insert (name); 
  forget (name, quiet) 
END PROC ins;