* call DefaultReplacements for #WRITE and #INCLUDE, resolves #28315

git-svn-id: trunk@31263 -

compiler/options.pas

@@ -2674,6 +2674,7 @@ begin
                if (s='WRITE') then
                 begin
                   Delete(opts,1,1);
+                  DefaultReplacements(opts);
                   WriteLn(opts);
                   Option_read:=true;
                 end
@@ -2681,6 +2682,7 @@ begin
                if (s='INCLUDE') then
                 begin
                   Delete(opts,1,1);
+                  DefaultReplacements(opts);
                   Interpret_file(opts);
                   Option_read:=true;
                 end