diff options
Diffstat (limited to 'src/ghdldrv/ghdlrun.adb')
| -rw-r--r-- | src/ghdldrv/ghdlrun.adb | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/ghdldrv/ghdlrun.adb b/src/ghdldrv/ghdlrun.adb index e8fd536a8..a1a3f2505 100644 --- a/src/ghdldrv/ghdlrun.adb +++ b/src/ghdldrv/ghdlrun.adb @@ -793,14 +793,18 @@ package body Ghdlrun is is pragma Unreferenced (Cmd); begin - return Name = "--run-help"; + return + Name = "run-help" or else + Name = "--run-help"; end Decode_Command; function Get_Short_Help (Cmd : Command_Run_Help) return String is pragma Unreferenced (Cmd); begin - return "--run-help Disp help for RUNOPTS options"; + return "run-help" + & ASCII.LF & " Display help for RUNOPTS options" + & ASCII.LF & " alias: --run-help"; end Get_Short_Help; procedure Perform_Action (Cmd : in out Command_Run_Help; |
