linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
cvs
2000-04-10 15:36:56 +00:00
parent d4974b94e8
commit ceb27b8fe5
4 changed files with 72 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
tecs/err_handling.c
View File

@@ -93,7 +93,7 @@ void ERR_EXIT(char *text) {
ErrWrite(text); exit(1);
}
void ErrShowFtn_(char *text, int length) {
void err_show_(char *text, int length) {
char buf[256];
if (length>=256) length=255;
@@ -106,9 +106,12 @@ void ErrShowFtn_(char *text, int length) {
typedef struct { short size, dummy; char *text; } Desc;
void ErrShowFtn(Desc *desc) {
ErrShowFtn_(desc->text, desc->size);
void err_show(Desc *desc) {
err_show_(desc->text, desc->size);
}
#endif
void errsetoutrtn_(void (*rtn)(), void *arg) {
ErrSetOutRtn(rtn, arg);
}