DEADSOFTWARE

ooops
authorKetmar Dark <ketmar@ketmar.no-ip.org>
Tue, 5 Sep 2017 22:12:18 +0000 (01:12 +0300)
committerKetmar Dark <ketmar@ketmar.no-ip.org>
Tue, 5 Sep 2017 22:12:22 +0000 (01:12 +0300)
src/game/g_grid.pas

index ec9c2aed80386c41332efae12d3d21fd55b801b5..3b36ba3acff15c455d8498cbae4f0afc60bd67a9 100644 (file)
@@ -326,7 +326,7 @@ uses
 
 
 // ////////////////////////////////////////////////////////////////////////// //
-procedure swapInt (var a: Integer; var b: Integer); inline; var t: Integer; begin t := a; a := b; b := t; end;
+//procedure swapInt (var a: Integer; var b: Integer); inline; var t: Integer; begin t := a; a := b; b := t; end;
 procedure swapInt (var a: Integer; var b: Integer); inline; begin a := a xor b; b := b xor a; a := a xor b; end;
 //function minInt (a, b: Integer): Integer; inline; begin if (a < b) then result := a else result := b; end;
 //function maxInt (a, b: Integer): Integer; inline; begin if (a > b) then result := a else result := b; end;