X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_graphics.pas;h=67cdb6567956152e75c79aefe4aed4acbfba3601;hb=c3883647dc5b9ad0b62d3163b2ad92e8b1b06d8a;hp=b10ae2257b509e9e17ff6662dc6d45386ca36367;hpb=3bac09ca2b9ebecd6f81f4fa052b081ffd40041c;p=d2df-sdl.git

diff --git a/src/engine/e_graphics.pas b/src/engine/e_graphics.pas
index b10ae22..67cdb65 100644
--- a/src/engine/e_graphics.pas
+++ b/src/engine/e_graphics.pas
@@ -583,7 +583,7 @@ end;
 procedure e_DrawFill(ID: DWORD; X, Y: Integer; XCount, YCount: Word; Alpha: Integer;
                      AlphaChannel: Boolean; Blending: Boolean);
 var
-  X2, Y2, dx, dy, w, h: Integer;
+  X2, Y2, dx, w, h: Integer;
   u, v: Single;
 begin
   glColor4ub(e_Colors.R, e_Colors.G, e_Colors.B, 255);
@@ -1743,7 +1743,7 @@ end;
 
 procedure e_RestoreGLContext();
 var
-  GLID: GLuint;
+  //GLID: GLuint;
   i: Integer;
 begin
   e_WriteLog('Restoring GL context:', MSG_NOTIFY);