From 96ba76e6706d3c23822a5e6c9cd59492352c43b3 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Wed, 3 Jul 2019 18:26:24 +0000
Subject: [PATCH] FpDebug: Fix FindProcSymbol, always search all
 CompilationUnits

git-svn-id: trunk@61516 -
---
 components/fpdebug/fpdbgdwarfdataclasses.pas | 19 ++-----------------
 1 file changed, 2 insertions(+), 17 deletions(-)

diff --git a/components/fpdebug/fpdbgdwarfdataclasses.pas b/components/fpdebug/fpdbgdwarfdataclasses.pas
index 6288b2bfbc..4893e812a3 100644
--- a/components/fpdebug/fpdbgdwarfdataclasses.pas
+++ b/components/fpdebug/fpdbgdwarfdataclasses.pas
@@ -3254,34 +3254,19 @@ begin
 
     Iter := TMapIterator.Create(CU.FAddressMap);
     try
-      if Iter.EOM
-      then begin
-        if MinMaxSet
-        then Exit //  minmaxset and no procs defined ???
-        else Continue;
-      end;
-
       if not Iter.Locate(AAddress)
       then begin
         if not Iter.BOM
         then Iter.Previous;
 
         if Iter.BOM
-        then begin
-          if MinMaxSet
-          then Exit //  minmaxset and no proc @ minpc ???
-          else Continue;
-        end;
+        then Continue;
       end;
 
       // iter is at the closest defined address before AAddress
       Info := Iter.DataPtr;
       if AAddress > Info^.EndPC
-      then begin
-        if MinMaxSet
-        then Exit //  minmaxset and no proc @ maxpc ???
-        else Continue;
-      end;
+      then Continue;
 
       // TDbgDwarfProcSymbol
       Result := Cu.DwarfSymbolClassMap.CreateProcSymbol(CU, Iter.DataPtr, AAddress);