diff options
| author | Tristan Gingold | 2015-11-30 06:43:17 +0100 |
|---|---|---|
| committer | Tristan Gingold | 2015-11-30 20:10:25 +0100 |
| commit | 7379c1371f2a83edbdf125a20b7565be983932dc (patch) | |
| tree | f46d8486d4fce2666f3c6a2e6764075967406659 /src/ghdldrv | |
| parent | c3845fa138a76f1369e20bc54016094a75da4df2 (diff) | |
| download | ghdl-7379c1371f2a83edbdf125a20b7565be983932dc.tar.gz ghdl-7379c1371f2a83edbdf125a20b7565be983932dc.tar.bz2 ghdl-7379c1371f2a83edbdf125a20b7565be983932dc.zip | |
Fix ghdl_simul build.
Diffstat (limited to 'src/ghdldrv')
| -rw-r--r-- | src/ghdldrv/ghdlsimul.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/ghdldrv/ghdlsimul.adb b/src/ghdldrv/ghdlsimul.adb index bf886e0..89d9f27 100644 --- a/src/ghdldrv/ghdlsimul.adb +++ b/src/ghdldrv/ghdlsimul.adb @@ -152,14 +152,14 @@ package body Ghdlsimul is elsif Arg.all = "--stats" then Simulation.Disp_Stats := True; elsif Arg.all = "-i" then + Simulation.Flag_Debugger := True; Simulation.Flag_Interractive := True; else Decode_Option (Arg.all, Status); case Status is when Decode_Option_Last => exit; - when Decode_Option_Help => - -- FIXME: is that correct ? + when Decode_Option_Stop => exit; when Decode_Option_Ok => null; |