1988-10-03 10:53:47 +00:00
|
|
|
#include <em_abs.h>
|
2013-05-07 23:48:48 +00:00
|
|
|
|
1988-10-03 10:53:47 +00:00
|
|
|
char *
|
1991-09-02 17:00:19 +00:00
|
|
|
_trpstr(d)
|
1988-10-03 10:53:47 +00:00
|
|
|
{
|
|
|
|
switch(d)
|
|
|
|
{
|
|
|
|
case EARRAY: return "array bound error";
|
|
|
|
case ERANGE: return "range bound error";
|
|
|
|
case ESET: return "set bound error";
|
|
|
|
case EIOVFL: return "integer overflow";
|
|
|
|
case EFOVFL: return "floating overflow";
|
|
|
|
case EFUNFL: return "floating underflow";
|
|
|
|
case EIDIVZ: return "divide by 0";
|
|
|
|
case EFDIVZ: return "divide by 0.0";
|
|
|
|
case EIUND: return "undefined integer";
|
|
|
|
case EFUND: return "undefined real";
|
|
|
|
case ECONV: return "conversion error";
|
|
|
|
case ESTACK: return "stack overflow";
|
|
|
|
case EHEAP: return "heap overflow";
|
|
|
|
case EILLINS: return "illegal instruction";
|
|
|
|
case EODDZ: return "illegal size argument";
|
|
|
|
case ECASE: return "case error";
|
|
|
|
case EMEMFLT: return "addressing non-existent memory";
|
|
|
|
case EBADPTR: return "bad pointer used";
|
|
|
|
case EBADPC: return "program counter out of range";
|
|
|
|
case EBADMON: return "bad monitor call";
|
|
|
|
case EBADLIN:
|
|
|
|
case EBADGTO:
|
|
|
|
case EBADLAE:
|
|
|
|
default:
|
|
|
|
return "strange trap";
|
|
|
|
}
|
|
|
|
/*NOTREACHED*/
|
|
|
|
}
|