* InitProc gets an inital value

This commit is contained in:
florian 2005-02-06 20:37:31 +00:00
parent aeac2a046d
commit 6f47022b58

View File

@ -363,6 +363,7 @@ const
IsMultiThread : boolean = FALSE;
{ Indicates if there was an error }
StackError : boolean = FALSE;
InitProc : Pointer = nil;
var
ExitCode : Word; public name 'operatingsystem_result';
@ -372,7 +373,6 @@ var
IsConsole : boolean;
{ Threading support }
fpc_threadvar_relocate_proc : pointer; public name 'FPC_THREADVAR_RELOCATE';
InitProc : Pointer;
{$ifdef SUPPORT_THREADVAR}
ThreadVar
@ -772,7 +772,10 @@ const
{
$Log$
Revision 1.117 2005-02-06 20:35:54 florian
Revision 1.118 2005-02-06 20:37:31 florian
* InitProc gets an inital value
Revision 1.117 2005/02/06 20:35:54 florian
+ InitProc
Revision 1.116 2005/02/06 11:20:52 peter