diff options
| author | Tristan Gingold <tgingold@free.fr> | 2014-11-09 18:31:54 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2014-11-09 18:31:54 +0100 |
| commit | fe94cb3cc3fd4517271faa9046c74b0c455aeb79 (patch) | |
| tree | 17ba28586cb5eb22d530c568d917931f309d871f /src/vhdl/translate/ortho_front.adb | |
| parent | 3c9a77e9e6f3b8047080f7d8c11bb9881cabf968 (diff) | |
| download | ghdl-fe94cb3cc3fd4517271faa9046c74b0c455aeb79.tar.gz ghdl-fe94cb3cc3fd4517271faa9046c74b0c455aeb79.tar.bz2 ghdl-fe94cb3cc3fd4517271faa9046c74b0c455aeb79.zip | |
Split translation into child packages.
Diffstat (limited to 'src/vhdl/translate/ortho_front.adb')
| -rw-r--r-- | src/vhdl/translate/ortho_front.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/translate/ortho_front.adb b/src/vhdl/translate/ortho_front.adb index 56c7e61dd..0473899af 100644 --- a/src/vhdl/translate/ortho_front.adb +++ b/src/vhdl/translate/ortho_front.adb @@ -285,7 +285,7 @@ package body Ortho_Front is when Action_Elaborate => Flags.Flag_Elaborate := True; Flags.Flag_Only_Elab_Warnings := True; - Translation.Chap12.Elaborate + Translation.Elaborate (Elab_Entity.all, Elab_Architecture.all, Elab_Filelist.all, False); @@ -324,7 +324,7 @@ package body Ortho_Front is Flags.Flag_Elaborate := True; Flags.Flag_Only_Elab_Warnings := False; - Translation.Chap12.Elaborate + Translation.Elaborate (Elab_Entity.all, Elab_Architecture.all, "", True); if Errorout.Nbr_Errors > 0 then |