suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Windows gc2/sighand.c, make code consise

Browse Source 
svn: r12677
This commit is contained in:
Kevin Tew 2008-12-02 17:32:28 +00:00
parent de03ebd5f9
commit 9fdd717d48
1 changed files with 7 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/mzscheme/gc2/sighand.c
View File

@ -118,20 +118,17 @@ static void initialize_signal_handler(GCTYPE *gc)
# ifdef NEED_SIGWIN
{
HMODULE hm;
PVOID (WINAPI*aveh)(ULONG, gcPVECTORED_EXCEPTION_HANDLER);
hm = LoadLibrary("kernel32.dll");
if (hm)
if (hm) {
PVOID (WINAPI*aveh)(ULONG, gcPVECTORED_EXCEPTION_HANDLER);
aveh = (PVOID (WINAPI*)(ULONG, gcPVECTORED_EXCEPTION_HANDLER))GetProcAddress(hm, "AddVectoredExceptionHandler");
else
aveh = NULL;
if (aveh)
aveh(TRUE, fault_handler);
else
}
else /* WINDOWS 95 */
gc->generations_available = 0;
}
# endif
}
static void remove_signal_handler(GCTYPE *gc)
{
@ -150,15 +147,13 @@ static void remove_signal_handler(GCTYPE *gc)
# ifdef NEED_SIGWIN
if (gc->generations_available) {
HMODULE hm;
ULONG (WINAPI*rveh)(gcPVECTORED_EXCEPTION_HANDLER);
hm = LoadLibrary("kernel32.dll");
if (hm)
if (hm) {
ULONG (WINAPI*rveh)(gcPVECTORED_EXCEPTION_HANDLER);
rveh = (ULONG (WINAPI*)(gcPVECTORED_EXCEPTION_HANDLER))GetProcAddress(hm, "RemoveVectoredExceptionHandler");
else
rveh = NULL;
if (rveh)
rveh(fault_handler);
}
}
# endif
}