diff options
Diffstat (limited to 'print/teTeX1-bin/patches/patch-al')
-rw-r--r-- | print/teTeX1-bin/patches/patch-al | 132 |
1 files changed, 132 insertions, 0 deletions
diff --git a/print/teTeX1-bin/patches/patch-al b/print/teTeX1-bin/patches/patch-al new file mode 100644 index 00000000000..fdc2fe0e29c --- /dev/null +++ b/print/teTeX1-bin/patches/patch-al @@ -0,0 +1,132 @@ +$NetBSD: patch-al,v 1.1.1.1 2003/12/24 12:57:30 jmmv Exp $ + +--- texk/ps2pkm/regions.c.orig Fri Mar 26 07:11:59 1999 ++++ texk/ps2pkm/regions.c Thu Sep 30 13:34:44 1999 +@@ -242,7 +242,7 @@ + register struct edgelist *next; /* loop variable */ + + if (area->references < 0) +- abort("KillRegion: negative reference count"); ++ t1_abort("KillRegion: negative reference count"); + if ( (--(area->references) > 1) || + ( (area->references == 1) && !ISPERMANENT(area->flag) ) ) + return; +@@ -308,7 +308,7 @@ + IfTrace2((RegionDebug),"....new edge: ymin=%d, ymax=%d ", + (LONG)ymin, (LONG) ymax); + if (ymin >= ymax) +- abort("newedge: height not positive"); ++ t1_abort("newedge: height not positive"); + /* + We are going to copy the xvalues into a newly allocated area. It + helps performance if the values are all "long" aligned. We can test +@@ -567,7 +567,7 @@ + break; + + default: +- abort("Interior: path type error"); ++ t1_abort("Interior: path type error"); + } + /* + We're done with this segment. Advance to the next path segment in +@@ -633,7 +633,7 @@ + } while (area != NULL && area->ymin == y); + + if (count != 0) +- abort("Unwind: uneven edges"); ++ t1_abort("Unwind: uneven edges"); + } + } + /* +@@ -691,7 +691,7 @@ + } + + if (ymax < ymin) +- abort("negative sized edge?"); ++ t1_abort("negative sized edge?"); + + + /* FIXME: there are not as much parameters as here. */ +@@ -942,9 +942,9 @@ + if (y < list->ymin) + break; + if (y >= list->ymax) +- abort("splitedge: above top of list"); ++ t1_abort("splitedge: above top of list"); + if (y == list->ymin) +- abort("splitedge: would be null"); ++ t1_abort("splitedge: would be null"); + + r = (struct edgelist *)Allocate(sizeof(struct edgelist), list, 0); + /* +@@ -984,7 +984,7 @@ + Then, we return the caller a pointer to 'new': + */ + if (new == NULL) +- abort("null splitedge"); ++ t1_abort("null splitedge"); + lastlist->link = NULL; + last->link = list; + IfTrace1((RegionDebug > 1),"yields %x\n", new); +@@ -1006,7 +1006,7 @@ + #endif + { + if (BOTTOM(top) > TOP(bottom)) +- abort("vertjoin not disjoint"); ++ t1_abort("vertjoin not disjoint"); + + for (; top->link != NULL; top=top->link) { ; } + +@@ -1114,7 +1114,7 @@ + + h0 = h = edge->ymax - edge->ymin; + if (h <= 0) +- abort("SwathUnion: 0 height swath?"); ++ t1_abort("SwathUnion: 0 height swath?"); + + before = before0; + after = before->link; +@@ -1378,7 +1378,7 @@ + + for (p = beg; p != right; p = p->link) { + if (p->link == NULL && right != NULL) +- abort("discard(): ran off end"); ++ t1_abort("discard(): ran off end"); + IfTrace1((RegionDebug > 0),"discarding %x\n", p); + p->ymin = p->ymax = 32767; + end = p; +@@ -1466,7 +1466,7 @@ + + for (edge=region->anchor; VALIDEDGE(edge); edge=next) { + if (edge->link == NULL) +- abort("UnJumble: unpaired edge?"); ++ t1_abort("UnJumble: unpaired edge?"); + next = edge->link->link; + edge->link->link = NULL; + anchor = SortSwath(anchor, edge, t1_SwathUnion); +@@ -1504,9 +1504,9 @@ + if (xmin != xmax || (xmin != R->xmin && xmax != R->xmax)) + R->flag &= ~ISRECTANGULAR(ON); + if (xmin < e->xmin || xmax > e->xmax) +- abort("Tighten: existing edge bound was bad"); ++ t1_abort("Tighten: existing edge bound was bad"); + if (xmin < R->xmin || xmax > R->xmax) +- abort("Tighten: existing region bound was bad"); ++ t1_abort("Tighten: existing region bound was bad"); + e->xmin = xmin; + e->xmax = xmax; + } +@@ -1755,11 +1755,11 @@ + int oldmin,oldmax; + { + if (edge->type != EDGETYPE) +- abort("EDGE ERROR: non EDGETYPE in list"); ++ t1_abort("EDGE ERROR: non EDGETYPE in list"); + /* + The following check is not valid if the region is jumbled so I took it + out: + */ + /* if (edge->ymin < oldmax && edge->ymin != oldmin) +- abort("EDGE ERROR: overlapping swaths"); */ ++ t1_abort("EDGE ERROR: overlapping swaths"); */ + } |