|
@@ -47,7 +47,6 @@ implementation
|
|
|
|
|
|
{$DEFINE FPC_FEXPAND_UNC} (* UNC paths are supported *)
|
|
|
{$DEFINE FPC_FEXPAND_DRIVES} (* Full paths begin with drive specification *)
|
|
|
-{$DEFINE HAS_LOCALTIMEZONEOFFSET}
|
|
|
|
|
|
{ Include platform independent implementation part }
|
|
|
{$i sysutils.inc}
|
|
@@ -645,8 +644,6 @@ end;
|
|
|
Time Functions
|
|
|
****************************************************************************}
|
|
|
|
|
|
-{$I tzenv.inc}
|
|
|
-
|
|
|
Procedure GetLocalTime(var SystemTime: TSystemTime);
|
|
|
var
|
|
|
Regs: Registers;
|
|
@@ -927,7 +924,6 @@ end;
|
|
|
Initialization
|
|
|
InitExceptions; { Initialize exceptions. OS independent }
|
|
|
InitInternational; { Initialize internationalization settings }
|
|
|
- InitTZ;
|
|
|
OnBeep:=@SysBeep;
|
|
|
Finalization
|
|
|
FreeTerminateProcs;
|