hedgewars/uGears.pas
changeset 191 a03c2d037e24
parent 188 a7c2a61524c2
child 211 558476056205
--- a/hedgewars/uGears.pas	Thu Oct 05 20:13:51 2006 +0000
+++ b/hedgewars/uGears.pas	Sun Oct 08 18:17:52 2006 +0000
@@ -60,7 +60,6 @@
 
 var CurAmmoGear: PGear = nil;
     GearsList: PGear = nil;
-    GearsListMutex: PSDL_mutex;
 
 implementation
 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions,
@@ -222,14 +221,12 @@
                 Result.Tag:= Y
                 end;
      end;
-SDL_LockMutex(GearsListMutex);
 if GearsList = nil then GearsList:= Result
                    else begin
                    GearsList.PrevGear:= Result;
                    Result.NextGear:= GearsList;
                    GearsList:= Result
-                   end;
-SDL_UnlockMutex(GearsListMutex)
+                   end
 end;
 
 procedure DeleteGear(Gear: PGear);
@@ -253,7 +250,6 @@
       RecountTeamHealth(team);
       end;
 {$IFDEF DEBUGFILE}AddFileLog('DeleteGear: handle = '+inttostr(integer(Gear)));{$ENDIF}
-SDL_LockMutex(GearsListMutex);
 if CurAmmoGear = Gear then CurAmmoGear:= nil;
 if FollowGear = Gear then FollowGear:= nil;
 if Gear.NextGear <> nil then Gear.NextGear.PrevGear:= Gear.PrevGear;
@@ -262,7 +258,6 @@
                         GearsList:= Gear^.NextGear;
                         if GearsList <> nil then GearsList.PrevGear:= nil
                         end;
-SDL_UnlockMutex(GearsListMutex);
 Dispose(Gear)
 end;
 
@@ -781,10 +776,8 @@
 end;
 
 initialization
-GearsListMutex:= SDL_CreateMutex;
 
 finalization
 FreeGearsList;
-SDL_DestroyMutex(GearsListMutex);
 
 end.