aboutsummaryrefslogtreecommitdiffstats
path: root/src/ghdldrv/ghdllocal.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2016-09-14 20:27:51 +0200
committerTristan Gingold <tgingold@free.fr>2016-09-14 20:27:51 +0200
commitd4c687a2bfc5035b8292de0eb222da5cc342777d (patch)
treeef58d79ac861499dba350e328eb8e2ed92b77138 /src/ghdldrv/ghdllocal.adb
parent52f10edcb18bfeabe56a99a5ee1d47eae34e32cb (diff)
downloadghdl-d4c687a2bfc5035b8292de0eb222da5cc342777d.tar.gz
ghdl-d4c687a2bfc5035b8292de0eb222da5cc342777d.tar.bz2
ghdl-d4c687a2bfc5035b8292de0eb222da5cc342777d.zip
Comments and reformatting.
Diffstat (limited to 'src/ghdldrv/ghdllocal.adb')
-rw-r--r--src/ghdldrv/ghdllocal.adb12
1 files changed, 4 insertions, 8 deletions
diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb
index 5072ad44f..193910896 100644
--- a/src/ghdldrv/ghdllocal.adb
+++ b/src/ghdldrv/ghdllocal.adb
@@ -43,8 +43,6 @@ package body Ghdllocal is
type Ieee_Lib_Kind is (Lib_Standard, Lib_None, Lib_Synopsys, Lib_Mentor);
Flag_Ieee : Ieee_Lib_Kind;
- Flag_Create_Default_Config : constant Boolean := True;
-
-- If TRUE, generate 32bits code on 64bits machines.
Flag_32bit : Boolean := False;
@@ -100,12 +98,10 @@ package body Ghdllocal is
end if;
if Flags.Flag_Elaborate then
- if Flag_Create_Default_Config then
- Lib := Get_Library_Unit (Unit);
- if Get_Kind (Lib) = Iir_Kind_Architecture_Body then
- Config := Canon.Create_Default_Configuration_Declaration (Lib);
- Set_Default_Configuration_Declaration (Lib, Config);
- end if;
+ Lib := Get_Library_Unit (Unit);
+ if Get_Kind (Lib) = Iir_Kind_Architecture_Body then
+ Config := Canon.Create_Default_Configuration_Declaration (Lib);
+ Set_Default_Configuration_Declaration (Lib, Config);
end if;
end if;
end Finish_Compilation;