You've already forked lazarus-ccr
LazMapViewer: Less hints and warnings
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8128 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -12,7 +12,7 @@
|
||||
unit mvGpsObj;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
{$WARN 6058 off : Call to subroutine "$1" marked as inline is not inlined}
|
||||
interface
|
||||
|
||||
uses
|
||||
|
@ -12,7 +12,7 @@
|
||||
unit mvGPX;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
{$WARN 6058 off : Call to subroutine "$1" marked as inline is not inlined}
|
||||
interface
|
||||
|
||||
uses
|
||||
|
@ -18,7 +18,7 @@
|
||||
unit mvMapViewer;
|
||||
|
||||
{$MODE objfpc}{$H+}
|
||||
|
||||
{$WARN 6058 off : Call to subroutine "$1" marked as inline is not inlined}
|
||||
interface
|
||||
|
||||
uses
|
||||
@ -957,6 +957,8 @@ var
|
||||
gpsList: TGPSObjList;
|
||||
i: Integer;
|
||||
begin
|
||||
Result := nil;
|
||||
|
||||
if ATolerance = -1 then
|
||||
ATolerance := DELTA;
|
||||
|
||||
|
Reference in New Issue
Block a user