mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-14 07:20:35 -08:00
Code Issues Projects Releases Wiki Activity

Allow breakpoint on abort

Browse source 
Copied from Perforce
 Change: 18846
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Tucker 1997-09-26 15:04:43 +01:00
parent 4f346ac03b
commit 4e022e7e4d
1 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
mps/qa/test/testlib/testlib.c
View file

@ -150,13 +150,17 @@ void error(const char *format, ...)
va_end(args);
}
static void myabort(void) {
abort();
}
void verror(const char *format, va_list args)
{
fprintf(stdout, "%% ERROR \n!error=true\n");
fprintf(stdout, "!errtext=");
vfprintf(stdout, format, args);
fprintf(stdout, "\n");
abort();
myabort();
}
/* asserts(1=0, "Axiom violation.");
@ -175,7 +179,7 @@ void asserts(int expr, const char *format, ...)
vfprintf(stdout, format, args);
fprintf(stdout, "\n");
va_end(args);
abort();
myabort();
}
}