From c26348a3dd5b72b1959373c41b850dff1ef8038c Mon Sep 17 00:00:00 2001 From: svenbarth Date: Sat, 20 Jul 2019 08:41:59 +0000 Subject: [PATCH] * follow up to r42457: FreeTerminateProcs needs to be called before DoneExceptions just in case an exception is triggered due to a corrupted list git-svn-id: trunk@42461 - --- rtl/amicommon/sysutils.pp | 2 +- rtl/atari/sysutils.pp | 2 +- rtl/embedded/sysutils.pp | 2 +- rtl/emx/sysutils.pp | 2 +- rtl/gba/sysutils.pp | 2 +- rtl/go32v2/sysutils.pp | 2 +- rtl/macos/sysutils.pp | 2 +- rtl/msdos/sysutils.pp | 2 +- rtl/nativent/sysutils.pp | 2 +- rtl/nds/sysutils.pp | 2 +- rtl/netware/sysutils.pp | 2 +- rtl/netwlibc/sysutils.pp | 2 +- rtl/os2/sysutils.pp | 2 +- rtl/symbian/sysutils.pp | 2 +- rtl/unix/sysutils.pp | 2 +- rtl/watcom/sysutils.pp | 2 +- rtl/wii/sysutils.pp | 2 +- rtl/win/sysutils.pp | 2 +- rtl/win16/sysutils.pp | 2 +- rtl/wince/sysutils.pp | 2 +- 20 files changed, 20 insertions(+), 20 deletions(-) diff --git a/rtl/amicommon/sysutils.pp b/rtl/amicommon/sysutils.pp index 9bf99e23a4..fe6bdced18 100644 --- a/rtl/amicommon/sysutils.pp +++ b/rtl/amicommon/sysutils.pp @@ -954,6 +954,6 @@ Initialization RefreshDeviceList; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/atari/sysutils.pp b/rtl/atari/sysutils.pp index 7be4308aad..b97d1b8682 100644 --- a/rtl/atari/sysutils.pp +++ b/rtl/atari/sysutils.pp @@ -532,6 +532,6 @@ Initialization OnBeep:=Nil; { No SysBeep() on Atari for now. } Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/embedded/sysutils.pp b/rtl/embedded/sysutils.pp index 40d9f7c7f0..3a7e56de5d 100644 --- a/rtl/embedded/sysutils.pp +++ b/rtl/embedded/sysutils.pp @@ -291,6 +291,6 @@ end; Initialization InitExceptions; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/emx/sysutils.pp b/rtl/emx/sysutils.pp index 4168714eab..d70a1f1c24 100644 --- a/rtl/emx/sysutils.pp +++ b/rtl/emx/sysutils.pp @@ -1340,6 +1340,6 @@ Initialization InitExceptions; { Initialize exceptions. OS independent } InitInternational; { Initialize internationalization settings } Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/gba/sysutils.pp b/rtl/gba/sysutils.pp index 43b3c85270..21358d192b 100644 --- a/rtl/gba/sysutils.pp +++ b/rtl/gba/sysutils.pp @@ -325,6 +325,6 @@ end; Initialization InitExceptions; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/go32v2/sysutils.pp b/rtl/go32v2/sysutils.pp index 31eeee0384..8faf45b320 100644 --- a/rtl/go32v2/sysutils.pp +++ b/rtl/go32v2/sysutils.pp @@ -920,6 +920,6 @@ Initialization InitInternational; { Initialize internationalization settings } OnBeep:=@SysBeep; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/macos/sysutils.pp b/rtl/macos/sysutils.pp index 083d128bd3..1fa411e60a 100644 --- a/rtl/macos/sysutils.pp +++ b/rtl/macos/sysutils.pp @@ -849,6 +849,6 @@ Initialization InitExceptions; { Initialize exceptions. OS independent } InitInternational; { Initialize internationalization settings } Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/msdos/sysutils.pp b/rtl/msdos/sysutils.pp index 14b45ba39c..b4b323bcb6 100644 --- a/rtl/msdos/sysutils.pp +++ b/rtl/msdos/sysutils.pp @@ -929,6 +929,6 @@ Initialization InitInternational; { Initialize internationalization settings } OnBeep:=@SysBeep; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/nativent/sysutils.pp b/rtl/nativent/sysutils.pp index f06787ffa8..55193479e8 100644 --- a/rtl/nativent/sysutils.pp +++ b/rtl/nativent/sysutils.pp @@ -1263,6 +1263,6 @@ initialization InitInternational; { Initialize internationalization settings } OnBeep := @SysBeep; finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/nds/sysutils.pp b/rtl/nds/sysutils.pp index 82ec1cd4b4..0a2b2d8692 100644 --- a/rtl/nds/sysutils.pp +++ b/rtl/nds/sysutils.pp @@ -364,6 +364,6 @@ end; Initialization InitExceptions; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/netware/sysutils.pp b/rtl/netware/sysutils.pp index 8da7f68563..2007322001 100644 --- a/rtl/netware/sysutils.pp +++ b/rtl/netware/sysutils.pp @@ -661,6 +661,6 @@ Initialization InitInternational; { Initialize internationalization settings } OnBeep:=@SysBeep; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/netwlibc/sysutils.pp b/rtl/netwlibc/sysutils.pp index 4ad7a745bc..d115e654de 100644 --- a/rtl/netwlibc/sysutils.pp +++ b/rtl/netwlibc/sysutils.pp @@ -728,6 +728,6 @@ Initialization InitExceptions; { Initialize exceptions. OS independent } InitInternational; { Initialize internationalization settings } Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/os2/sysutils.pp b/rtl/os2/sysutils.pp index 1cfc041646..08e67fba38 100644 --- a/rtl/os2/sysutils.pp +++ b/rtl/os2/sysutils.pp @@ -1003,6 +1003,6 @@ Initialization LastOSError := 0; OrigOSErrorWatch := TOSErrorWatch (SetOSErrorTracking (@TrackLastOSError)); Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/symbian/sysutils.pp b/rtl/symbian/sysutils.pp index eb70d11be0..d9c9d8e634 100644 --- a/rtl/symbian/sysutils.pp +++ b/rtl/symbian/sysutils.pp @@ -291,6 +291,6 @@ end; Initialization InitExceptions; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/unix/sysutils.pp b/rtl/unix/sysutils.pp index 60f2a574a7..a15e96bc81 100644 --- a/rtl/unix/sysutils.pp +++ b/rtl/unix/sysutils.pp @@ -1663,6 +1663,6 @@ Initialization Finalization FreeDriveStr; - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/watcom/sysutils.pp b/rtl/watcom/sysutils.pp index b44cdbf2ff..50da092316 100644 --- a/rtl/watcom/sysutils.pp +++ b/rtl/watcom/sysutils.pp @@ -898,6 +898,6 @@ Initialization InitInternational; { Initialize internationalization settings } InitDelay; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/wii/sysutils.pp b/rtl/wii/sysutils.pp index 9bc1aecfbb..588d1cf5c0 100644 --- a/rtl/wii/sysutils.pp +++ b/rtl/wii/sysutils.pp @@ -294,6 +294,6 @@ end; Initialization InitExceptions; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/win/sysutils.pp b/rtl/win/sysutils.pp index b0c4c30955..a3c973d153 100644 --- a/rtl/win/sysutils.pp +++ b/rtl/win/sysutils.pp @@ -1658,6 +1658,6 @@ Initialization InitSysConfigDir; OnBeep:=@SysBeep; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/win16/sysutils.pp b/rtl/win16/sysutils.pp index d7d4a3a9f1..21ce77d188 100644 --- a/rtl/win16/sysutils.pp +++ b/rtl/win16/sysutils.pp @@ -951,6 +951,6 @@ Initialization InitInternational; { Initialize internationalization settings } OnBeep:=@SysBeep; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end. diff --git a/rtl/wince/sysutils.pp b/rtl/wince/sysutils.pp index dc497379d4..3157718b2d 100644 --- a/rtl/wince/sysutils.pp +++ b/rtl/wince/sysutils.pp @@ -982,7 +982,7 @@ Initialization SysConfigDir:='\Windows'; Finalization - DoneExceptions; FreeTerminateProcs; + DoneExceptions; end.