diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-06-04 21:38:52 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-06-05 05:27:56 +0200 |
| commit | 8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c (patch) | |
| tree | e0112dca17c6673edeac89cecfa31f9e196baee4 /src | |
| parent | 65c309f9d46d1a7f1dfc046d23e2b691fbfc6d57 (diff) | |
| download | ghdl-8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c.tar.gz ghdl-8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c.tar.bz2 ghdl-8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c.zip | |
ghdldrv: handle --force-analysis for llvm and gcc.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ghdldrv/ghdlcomp.adb | 3 | ||||
| -rw-r--r-- | src/ghdldrv/ghdldrv.adb | 3 | ||||
| -rw-r--r-- | src/options.adb | 2 |
3 files changed, 3 insertions, 5 deletions
diff --git a/src/ghdldrv/ghdlcomp.adb b/src/ghdldrv/ghdlcomp.adb index cee8f037e..878d20eb0 100644 --- a/src/ghdldrv/ghdlcomp.adb +++ b/src/ghdldrv/ghdlcomp.adb @@ -61,9 +61,6 @@ package body Ghdlcomp is elsif Option = "--check-ast" then Flags.Check_Ast_Level := Flags.Check_Ast_Level + 1; Res := Option_Ok; - elsif Option = "--force-analysis" then - Cmd.Flag_Force_Analysis := True; - Res := Option_Ok; elsif Hooks.Decode_Option.all (Option) then Res := Option_Ok; elsif Option'Length > 18 diff --git a/src/ghdldrv/ghdldrv.adb b/src/ghdldrv/ghdldrv.adb index 1907ccf10..5817b974d 100644 --- a/src/ghdldrv/ghdldrv.adb +++ b/src/ghdldrv/ghdldrv.adb @@ -417,8 +417,7 @@ package body Ghdldrv is & Get_Object_Suffix.all; end Get_Object_Filename; - procedure Add_Argument (Inst : in out Instance; Arg : String_Access) - is + procedure Add_Argument (Inst : in out Instance; Arg : String_Access) is begin Increment_Last (Inst); Inst.Table (Last (Inst)) := Arg; diff --git a/src/options.adb b/src/options.adb index 85383b915..65e4fcdd8 100644 --- a/src/options.adb +++ b/src/options.adb @@ -142,6 +142,8 @@ package body Options is end; elsif Opt = "-C" or else Opt = "--mb-comments" then Mb_Comment := True; + elsif Opt = "--force-analysis" then + Flag_Force_Analysis := True; elsif Opt = "-fcaret-diagnostics" then Flag_Caret_Diagnostics := True; elsif Opt = "-fno-caret-diagnostics" then |