diff --git a/converter/convertdelphi.pas b/converter/convertdelphi.pas
index 59a0e226b7..65258418c4 100644
--- a/converter/convertdelphi.pas
+++ b/converter/convertdelphi.pas
@@ -66,6 +66,7 @@ type
     fConverter: TConvertDelphiPBase;
     fPath: string;
     // These 2 are references to the TConvertDelphiPBase variables.
+    // MG: No, they are not, I will delete them eventually ...
     fCachedUnitNames: TStringToStringTree;
     fCachedRealFileNames: TStringToStringTree;
   protected
diff --git a/debugger/debugutils.pp b/debugger/debugutils.pp
index a411497650..3ce6e5869b 100644
--- a/debugger/debugutils.pp
+++ b/debugger/debugutils.pp
@@ -187,7 +187,6 @@ function UnEscapeOctal(const AValue: String): String;
 var
   c, cnt, len: Integer;
   Src, Dst: PChar;
-  Oct: PChar;
 begin
   len := Length(AValue);
   if len = 0 then Exit('');
@@ -205,7 +204,6 @@ begin
       dec(cnt);
       if Src^ <> '\'
       then begin
-        Oct := Src;
         c := 0;
         while (Src^ in ['0'..'7']) and (cnt > 0)
         do begin