diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-06-25 09:23:23 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-06-25 09:23:23 (GMT) |
| commit | 6de91b6b7d469c5f8d511700b75689df23e43fd1 (patch) | |
| tree | 90f2e6301f5b1f1d4ece4510cdfe8b9dadcf074d /win/tclWinFile.c | |
| parent | 4eb006ef70aa3737a687697eb03ba83b080e1a1a (diff) | |
| parent | 076eb7c9e473f60d3821b1fcc622f69fbb8eba14 (diff) | |
| download | tcl-6de91b6b7d469c5f8d511700b75689df23e43fd1.zip tcl-6de91b6b7d469c5f8d511700b75689df23e43fd1.tar.gz tcl-6de91b6b7d469c5f8d511700b75689df23e43fd1.tar.bz2 | |
merge trunk
Diffstat (limited to 'win/tclWinFile.c')
| -rw-r--r-- | win/tclWinFile.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c index 2cc14ec..4a49b6c 100644 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -819,6 +819,16 @@ tclWinDebugPanic( MessageBoxW(NULL, msgString, L"Fatal Error", MB_ICONSTOP | MB_OK | MB_TASKMODAL | MB_SETFOREGROUND); } +#if defined(__GNUC__) + __builtin_trap(); +#elif defined(_WIN64) + __debugbreak(); +#elif defined(_MSC_VER) + _asm {int 3} +#else + DebugBreak(); +#endif + abort(); } /* |