7
static void printseg(FILE *fp, Seg_t *seg)
9
fprintf(fp,"%.2f %.2f map moveto %.2f %.2f map lineto stroke\n",
10
x(seg->p[0]),y(seg->p[0]),x(seg->p[1]),y(seg->p[1]));
13
void ERprint(FILE *fp, ERview_t *d, ilbool all)
19
static int onetime = TRUE;
22
fprintf(fp,"%%!PS\n");
23
fprintf(fp,"/map {72 mul exch 72 mul exch} bind def\n");
26
for (i = 0; (b = d->config->list[i]); i++) {
27
for (side = 0; side < NSIDES; side++) {
28
for (j = 0; (seg = b->segs[side]->list[j]); j++) {
30
case s_forbidden: break;
31
case s_plain: if (all) printseg(fp,seg); break;
33
fprintf(fp,"gsave 1 0 0 setrgbcolor\n");
35
fprintf(fp,"grestore\n");
38
fprintf(fp,"gsave 3 setlinewidth\n");
40
fprintf(fp,"grestore\n");
46
fprintf(fp,"showpage\n");
49
void ERpr(ERview_t *d, ilbool all)
51
ERprint(stderr,d,all);