1*43226Sbostic #include <stdio.h>
2*43226Sbostic #include "../include/defines.h"
3*43226Sbostic #include "../include/machdefs.h"
4*43226Sbostic 
5*43226Sbostic 
6*43226Sbostic 
7*43226Sbostic prchars(fp, s)
8*43226Sbostic FILEP fp;
9*43226Sbostic int *s;
10*43226Sbostic {
11*43226Sbostic 
12*43226Sbostic fprintf(fp, ".byte 0%o,0%o\n", s[0], s[1]);
13*43226Sbostic }
14*43226Sbostic 
15*43226Sbostic 
16*43226Sbostic 
17*43226Sbostic pruse(fp, s)
18*43226Sbostic FILEP fp;
19*43226Sbostic char *s;
20*43226Sbostic {
21*43226Sbostic fprintf(fp, "\t%s\n", s);
22*43226Sbostic }
23*43226Sbostic 
24*43226Sbostic 
25*43226Sbostic 
26*43226Sbostic prskip(fp, k)
27*43226Sbostic FILEP fp;
28*43226Sbostic ftnint k;
29*43226Sbostic {
30*43226Sbostic fprintf(fp, "\t.space\t%ld\n", k);
31*43226Sbostic }
32*43226Sbostic 
33*43226Sbostic 
34*43226Sbostic 
35*43226Sbostic 
36*43226Sbostic 
37*43226Sbostic prcomblock(fp, name)
38*43226Sbostic FILEP fp;
39*43226Sbostic char *name;
40*43226Sbostic {
41*43226Sbostic fprintf(fp, LABELFMT, name);
42*43226Sbostic }
43