* System.ExitProc type changed to CodePointer

git-svn-id: trunk@24848 -

rtl/inc/systemh.inc

@@ -584,7 +584,7 @@ const
   Max_Frame_Dump : Word = 8;
 
 { Exit Procedure handling consts and types  }
-  ExitProc : pointer = nil;
+  ExitProc : codepointer = nil;
   Erroraddr: pointer = nil;
   Errorcode: Word    = 0;