Changeset 207 for trunk/Database.pas


Ignore:
Timestamp:
May 8, 2020, 6:28:51 PM (5 years ago)
Author:
chronos
Message:
  • Fixed: Removed more compiler hints and warnings.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Database.pas

    r186 r207  
    1111const
    1212  // additional test flags
    13   FastContact = false; { extra small world with railroad everywhere }
     13  //{$DEFINE FastContact} { extra small world with railroad everywhere }
    1414
    1515  neumax = 4096;
    … …  
    16571657  i, p, p1, uix, Loc1: integer;
    16581658begin
    1659   if FastContact then { Railroad everywhere }
     1659  {$IFDEF FastContact}
     1660    { Railroad everywhere }
    16601661    for Loc1 := 0 to MapSize - 1 do
    16611662      if RealMap[Loc1] and fTerrain >= fGrass then
    16621663        RealMap[Loc1] := RealMap[Loc1] or fRR;
     1664  {$ENDIF}
    16631665
    16641666  { !!!for Loc1:=0 to MapSize-1 do
Note: See TracChangeset for help on using the changeset viewer.