2019-08-21 15:06:13 -04:00
|
|
|
#pragma aux DivideByZeroError aborts;
|
|
|
|
extern void DivideByZeroError(void);
|
|
|
|
|
|
|
|
#pragma aux lerrorf aborts;
|
2019-08-25 15:11:00 -04:00
|
|
|
extern void lerrorf(value_t e, const char *format, ...);
|
2019-08-21 15:06:13 -04:00
|
|
|
|
|
|
|
#pragma aux lerror aborts;
|
|
|
|
extern void lerror(value_t e, const char *msg);
|
|
|
|
|
|
|
|
#pragma aux fl_raise aborts;
|
|
|
|
extern void fl_raise(value_t e);
|
|
|
|
|
|
|
|
#pragma aux type_error aborts;
|
2019-08-25 15:11:00 -04:00
|
|
|
extern void type_error(const char *fname, const char *expected, value_t got);
|
2019-08-21 15:06:13 -04:00
|
|
|
|
|
|
|
#pragma aux bounds_error aborts;
|
2019-08-25 15:11:00 -04:00
|
|
|
extern void bounds_error(const char *fname, value_t arr, value_t ind);
|