LazMapViewer: Less hints and warnings

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8128 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2021-10-27 16:38:32 +00:00
parent ec31b7bdb6
commit 83b7ffa66d
3 changed files with 5 additions and 3 deletions
--- a/components/lazmapviewer/source/mvmapviewer.pas
+++ b/components/lazmapviewer/source/mvmapviewer.pas
@ -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;