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
30
31
32
33
34
|
/* -*-C-*- dumpchar.h */
/*-->dumpchar*/
/**********************************************************************/
/****************************** dumpchar ******************************/
/**********************************************************************/
void
dumpchar(tcharptr,s) /* DEBUGGING routine */
register struct char_entry *tcharptr;
char s[];
{
UNSIGN16 ilimit;
register UNSIGN16 i;
register COORDINATE j;
register *raster_word;
raster_word = tcharptr->rasters; /* pointer to first raster word */
(void)fprintf(stderr,
"DumpChar(%s): pfrp = %d\trasters at %06o",
s,tcharptr->pfrp,raster_word);
NEWLINE(stderr);
(void)fprintf(stderr,"\t(xcp,ycp) = %d %d",xcp,ycp);
NEWLINE(stderr);
(void)fprintf(stderr,"\t(wp,hp) = %d %d",tcharptr->wp,tcharptr->hp);
NEWLINE(stderr);
ilimit = (tcharptr->wp + 31)/32;
for (j = tcharptr->hp; j > 0; --j)
{
for (i = 0; i < ilimit; ++i)
(void)fprintf(stderr,"%9x ",*raster_word++);
(void)fprintf(stderr,"| ");
}
NEWLINE(stderr);
}
|