소스 검색

* Write a warning to stderr that this utility is deprecated

git-svn-id: trunk@15213 -
joost 15 년 전
부모
커밋
f1e4de764a
1개의 변경된 파일2개의 추가작업 그리고 0개의 파일을 삭제
  1. 2 0
      compiler/utils/fpcsubst.pp

+ 2 - 0
compiler/utils/fpcsubst.pp

@@ -28,6 +28,7 @@ Resourcestring
   SWarnIgnoringPair = 'Warning: ignoring wrong name/value pair: ';
   SWarnIgnoringPair = 'Warning: ignoring wrong name/value pair: ';
   SStats = 'Replaced %d placeholders in %d lines.';
   SStats = 'Replaced %d placeholders in %d lines.';
   SSubstInLine = 'Replaced %s placeholders in line %d.';
   SSubstInLine = 'Replaced %s placeholders in line %d.';
+  SWarningDeprecated = 'Warning: This utility is deprecated and will be removed from fpc in the future. Please use fpcmkcfg instead.';
 
 
 
 
 Var
 Var
@@ -231,6 +232,7 @@ begin
 end;
 end;
 
 
 begin
 begin
+  WriteLn(StdErr,SWarningDeprecated);
   Init;
   Init;
   Try
   Try
     ProcessCommandLine;
     ProcessCommandLine;