mirror of
https://github.com/vapaamies/KolibriOS.git
synced 2025-09-21 22:53:51 +02:00
28 lines
348 B
ObjectPascal
28 lines
348 B
ObjectPascal
(*
|
|
KolibriOS RTL SysInit unit
|
|
|
|
Copyright (c) 2020 Delphi SDK for KolibriOS team
|
|
*)
|
|
|
|
unit SysInit;
|
|
|
|
interface
|
|
|
|
procedure _InitExe(InitTable: PPackageInfo);
|
|
|
|
var
|
|
TLSIndex: Integer = -1;
|
|
TLSLast: Byte;
|
|
|
|
const
|
|
PtrToNil: Pointer = nil;
|
|
|
|
implementation
|
|
|
|
procedure _InitExe(InitTable: PPackageInfo);
|
|
begin
|
|
_StartExe(InitTable);
|
|
end;
|
|
|
|
end.
|