2
0
Эх сурвалжийг харах

* show usage if no parameters

git-svn-id: trunk@12747 -
marco 16 жил өмнө
parent
commit
cb7f19e798

+ 6 - 0
utils/fpdoc/fpclasschart.pp

@@ -715,6 +715,11 @@ var
 
 
 begin
 begin
   Result:=0;
   Result:=0;
+  if ParamCount=0 then
+    begin
+      Usage;
+      Halt(0);
+    end;
   DocLang:='';
   DocLang:='';
   for i := 1 to ParamCount do
   for i := 1 to ParamCount do
     ParseOption(ParamStr(i));
     ParseOption(ParamStr(i));
@@ -744,6 +749,7 @@ begin
   WriteLn(STitle);
   WriteLn(STitle);
   WriteLn(Format(SVersion, [FPCVersion, FPCDate]));
   WriteLn(Format(SVersion, [FPCVersion, FPCDate]));
   WriteLn(SCopyright);
   WriteLn(SCopyright);
+ 
   InitOptions;
   InitOptions;
   Try
   Try
     E:=ParseCommandLine;
     E:=ParseCommandLine;