aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2019-06-04 21:38:52 +0200
committerTristan Gingold <tgingold@free.fr>2019-06-05 05:27:56 +0200
commit8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c (patch)
treee0112dca17c6673edeac89cecfa31f9e196baee4 /src/ghdldrv
parent65c309f9d46d1a7f1dfc046d23e2b691fbfc6d57 (diff)
downloadghdl-8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c.tar.gz
ghdl-8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c.tar.bz2
ghdl-8acde9575b0f9ea7f6a9a99626c0a8a877caeb9c.zip
ghdldrv: handle --force-analysis for llvm and gcc.
Diffstat (limited to 'src/ghdldrv')
-rw-r--r--src/ghdldrv/ghdlcomp.adb3
-rw-r--r--src/ghdldrv/ghdldrv.adb3
2 files changed, 1 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;