X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_log.pas;h=629eed68cb8845a11bd954b4eb2d9002828ce7f4;hb=90cf86c8e9339852b3c1831c446e242dea4d1074;hp=dbe7b5dc2773f5881427c776d1d66f57e2835e7d;hpb=4c8663e5276acff2eb18ad93b77f341d330c8702;p=d2df-sdl.git diff --git a/src/engine/e_log.pas b/src/engine/e_log.pas index dbe7b5d..629eed6 100644 --- a/src/engine/e_log.pas +++ b/src/engine/e_log.pas @@ -19,13 +19,14 @@ unit e_log; interface -uses - SysUtils; + uses SysUtils; -type - TWriteMode = (WM_NEWFILE, WM_OLDFILE); - TMsgType = (Fatal, Warning, Notify); + type + TWriteMode = (WM_NEWFILE, WM_OLDFILE); + TMsgType = (Fatal, Warning, Notify); + procedure e_Log_Initialize; + procedure e_Log_Finalize; procedure e_InitLog (fFileName: String; fWriteMode: TWriteMode); procedure e_DeinitLog (); @@ -58,6 +59,16 @@ var driverInited: Boolean = false; + procedure e_Log_Initialize; + begin + end; + + procedure e_Log_Finalize; + begin + e_DeinitLog + end; + + function DecodeIPV4 (ip: LongWord): string; begin {$IFDEF FPC_LITTLE_ENDIAN}