436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
|
static int
TestExceptionCmd(
ClientData dummy, /* Unused */
Tcl_Interp* interp, /* Tcl interpreter */
int objc, /* Argument count */
Tcl_Obj *CONST objv[]) /* Argument vector */
{
static char *cmds[] = {
"access_violation",
"datatype_misalignment",
"array_bounds",
"float_denormal",
"float_divbyzero",
"float_inexact",
"float_invalidop",
|
|
|
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
|
static int
TestExceptionCmd(
ClientData dummy, /* Unused */
Tcl_Interp* interp, /* Tcl interpreter */
int objc, /* Argument count */
Tcl_Obj *CONST objv[]) /* Argument vector */
{
static CONST84 char *cmds[] = {
"access_violation",
"datatype_misalignment",
"array_bounds",
"float_denormal",
"float_divbyzero",
"float_inexact",
"float_invalidop",
|
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
|
"stack_overflow",
"invalid_disp",
"guard_page",
"invalid_handle",
"ctrl+c",
NULL
};
static DWORD exceptions[] = {
EXCEPTION_ACCESS_VIOLATION,
EXCEPTION_DATATYPE_MISALIGNMENT,
EXCEPTION_ARRAY_BOUNDS_EXCEEDED,
EXCEPTION_FLT_DENORMAL_OPERAND,
EXCEPTION_FLT_DIVIDE_BY_ZERO,
EXCEPTION_FLT_INEXACT_RESULT,
EXCEPTION_FLT_INVALID_OPERATION,
|
|
|
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
|
"stack_overflow",
"invalid_disp",
"guard_page",
"invalid_handle",
"ctrl+c",
NULL
};
static const DWORD exceptions[] = {
EXCEPTION_ACCESS_VIOLATION,
EXCEPTION_DATATYPE_MISALIGNMENT,
EXCEPTION_ARRAY_BOUNDS_EXCEEDED,
EXCEPTION_FLT_DENORMAL_OPERAND,
EXCEPTION_FLT_DIVIDE_BY_ZERO,
EXCEPTION_FLT_INEXACT_RESULT,
EXCEPTION_FLT_INVALID_OPERATION,
|