diff --git a/components/fpdebug/fpimgreaderbase.pas b/components/fpdebug/fpimgreaderbase.pas
index d7895811dd..813a264463 100644
--- a/components/fpdebug/fpimgreaderbase.pas
+++ b/components/fpdebug/fpimgreaderbase.pas
@@ -202,7 +202,7 @@ begin
   {$IFDEF MacOS}
   if (RightStr(AFileName,4) = '.app') then begin
     s := ExtractFileName(AFileName);
-    s := AFileName + PathDelim + 'Contents' + PathDelim + 'MacOs' + PathDelim + copy(s, 1, Length(s) - 4);
+    s := AFileName + PathDelim + 'Contents' + PathDelim + 'MacOS' + PathDelim + copy(s, 1, Length(s) - 4);
     if (FileExists(s)) then AFileName := s
   end;
   {$ENDIF}
diff --git a/components/fpdebug/fpimgreadermacho.pas b/components/fpdebug/fpimgreadermacho.pas
index b374b1ea81..7f9a491892 100644
--- a/components/fpdebug/fpimgreadermacho.pas
+++ b/components/fpdebug/fpimgreadermacho.pas
@@ -353,11 +353,11 @@ begin
   // those .o files a dSYM-bundle could be used, which could be generated
   // with dsymutil.
 
-  // PLoader.FileName in Contents/MacOs
+  // PLoader.FileName in Contents/MacOS
   ALoader:=nil;
 
   fname := PLoader.FileName;
-  i := pos('/Contents/MacOs', fname);
+  i := pos('/Contents/MacOS', fname);
   if i > 0 then delete(fname, i, Length(fname));
   dSYMFilename:=ChangeFileExt(PLoader.FileName, '.dSYM');
   dSYMFilename:=dSYMFilename+'/Contents/Resources/DWARF/'+ExtractFileName(fname); // TDbgProcess.Name