diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2012-06-22 10:51:04 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2012-06-22 10:51:04 (GMT) |
| commit | e1fda1fb4ff4e7112f2dac43d1460a3c69a6e036 (patch) | |
| tree | 5c72174728826ad431deabc97f7e66399f8d3fe3 /win/tclWinFile.c | |
| parent | a56a79105488bc24fcbbb1bb41e9143e9cdcda2d (diff) | |
| download | tcl-e1fda1fb4ff4e7112f2dac43d1460a3c69a6e036.zip tcl-e1fda1fb4ff4e7112f2dac43d1460a3c69a6e036.tar.gz tcl-e1fda1fb4ff4e7112f2dac43d1460a3c69a6e036.tar.bz2 | |
Restored the possibility to define a panicproc as
low memory handler See: [#1446864]
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(); } /* |