hedgewars/uLandObjects.pas
branchsdl2transition
changeset 9682 aa2431ed87b2
parent 9295 f8819c3dde54
child 9688 98024c99e58d
--- a/hedgewars/uLandObjects.pas	Tue Nov 05 23:33:23 2013 +0100
+++ b/hedgewars/uLandObjects.pas	Thu Nov 07 21:06:30 2013 +0400
@@ -103,7 +103,7 @@
 WriteToConsole('Generating collision info... ');
 
 if SDL_MustLock(Image) then
-    SDLTry(SDL_LockSurface(Image) >= 0, true);
+    SDLTry(SDL_LockSurface(Image) >= 0, 'SDL_LockSurface', true);
 
 bpp:= Image^.format^.BytesPerPixel;
 TryDo(bpp = 4, 'Land object should be 32bit', true);
@@ -149,7 +149,7 @@
 WriteToConsole('Generating collision info... ');
 
 if SDL_MustLock(Image) then
-    SDLTry(SDL_LockSurface(Image) >= 0, true);
+    SDLTry(SDL_LockSurface(Image) >= 0, 'SDL_LockSurface', true);
 
 bpp:= Image^.format^.BytesPerPixel;
 TryDo(bpp = 4, 'Land object should be 32bit', true);