diff --git a/components/fpdebug/fpdbglinuxclasses.pas b/components/fpdebug/fpdbglinuxclasses.pas
index d3099df03c..6a60e5e3cf 100644
--- a/components/fpdebug/fpdbglinuxclasses.pas
+++ b/components/fpdebug/fpdbglinuxclasses.pas
@@ -909,7 +909,7 @@ begin
   end;
 
   // check for pending events in other threads
-  for ThreadToContinue1 in FThreadMap do begin
+  for TDbgThread(ThreadToContinue) in FThreadMap do begin
     if (ThreadToContinue <> AThread) and (not ThreadToContinue.FIsInInternalPause) and
        (ThreadToContinue.FExceptionSignal <> 0)
     then