* fixed compilation after r30351 (mantis #27918)

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@32184 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 1 insertions, 1 deletions

diff --git a/rtl/nativent/system.pp b/rtl/nativent/system.pp
index aead564f56..adac353973 100644
--- a/rtl/nativent/system.pp
+++ b/rtl/nativent/system.pp
@@ -337,7 +337,7 @@ begin
       if Dll_Process_Detach_Hook <> Nil then
         Dll_Process_Detach_Hook(aDllParam);
       // finalize units
-      do_exit;
+      internal_do_exit;
     end;
   end;
 end;