+/* Copyright (c) 1979 Regents of the University of California */
+
+static char sccsid[] = "@(#)perror.c 4.1 10/10/80";
+
#include "stdio.h"
#include "signal.h"
#include "h00vars.h"
case EBADFNUM:
fputs("Bad data found on real read\n",stderr);
break;
+ case ENUMNTFD:
+ fputs("Unknown name found on enumerated type read\n",stderr);
+ break;
+ case ENAMRNG:
+ fputs("Enumerated type value out of range on output\n",stderr);
+ break;
+ case EFMTSIZE:
+ fputs("Negative format width\n",stderr);
+ break;
+ case ENARGS:
+ fputs("Improper number of arguments to formal routine\n"
+ ,stderr);
+ break;
case EGOTO:
fputs("Panic: active frame not found in goto\n",stderr);
break;
fputs("Ran out of memory\n",stderr);
break;
case ETRASHHEAP:
- fputs("Attempt to dispose of previously deallocated memory\n",stderr);
+ fputs("Improper use of new variables has caused heap integrity check to fail\n",stderr);
+ break;
+ case ECTLWR:
+ fputs("Range lower bound out of set bounds\n", stderr);
break;
- case ECTTOT:
- fputs("Constructed set argument exceeds set bounds\n",stderr);
+ case ECTUPR:
+ fputs("Range upper bound out of set bounds\n", stderr);
+ break;
+ case ECTSNG:
+ fputs("Single value out of set bounds\n", stderr);
break;
case EARGV:
fputs("Argument to argv out of range\n",stderr);
case ESTKOVFLO:
fputs("Runtime stack overflow\n",stderr);
break;
- case EFRAMESIZE:
- fputs("Compiler restricts declarations to 32768 bytes per block\n",stderr);
- break;
default:
fputs("Panic: unknown error\n",stderr);
}
-if (nodump == 0)
- backtrace(errnum);
+backtrace(errnum);
psexit(errnum);
}