X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fstub%2Fg_system.pas;h=9d14f24fcaa45a3740b1f74a551b418bcd236c62;hb=f8c006bbcbec547e9a3beda8372076a10ed049ae;hp=c3b4b23e0ee43fbacdec4756a62f4bdd782c4dcd;hpb=91448a18a3dad8151acb610601f79bf82bca6c91;p=d2df-sdl.git diff --git a/src/game/stub/g_system.pas b/src/game/stub/g_system.pas index c3b4b23..9d14f24 100644 --- a/src/game/stub/g_system.pas +++ b/src/game/stub/g_system.pas @@ -37,6 +37,10 @@ interface procedure sys_Init; procedure sys_Final; + var (* hooks *) + sys_CharPress: procedure (ch: AnsiChar) = nil; + sys_ScreenResize: procedure (w, h: Integer) = nil; + implementation uses SysUtils;