diff options
author | Tristan Gingold <tgingold@free.fr> | 2016-10-15 13:23:36 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2016-10-15 13:23:36 +0200 |
commit | 0d82b72ca11cb249888356caec800ddd43a70c82 (patch) | |
tree | 32aff68491cf3ecf5b168736cb783f988af96ea1 /src/vhdl/translate/translation.adb | |
parent | 6130e048c1dc667684d16792e9439a95483cbeb3 (diff) | |
download | ghdl-0d82b72ca11cb249888356caec800ddd43a70c82.tar.gz ghdl-0d82b72ca11cb249888356caec800ddd43a70c82.tar.bz2 ghdl-0d82b72ca11cb249888356caec800ddd43a70c82.zip |
Finish_Compilation: factorize code, move to libraries.
Diffstat (limited to 'src/vhdl/translate/translation.adb')
-rw-r--r-- | src/vhdl/translate/translation.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/translate/translation.adb b/src/vhdl/translate/translation.adb index 977162565..1a4703f95 100644 --- a/src/vhdl/translate/translation.adb +++ b/src/vhdl/translate/translation.adb @@ -28,6 +28,7 @@ with Std_Package; use Std_Package; with Sem_Specs; with Libraries; with Std_Names; +with Canon; with Trans; with Trans_Decls; use Trans_Decls; with Trans.Chap1; @@ -362,6 +363,9 @@ package body Translation is begin Init_Node_Infos; + -- Set flags for canon. + Canon.Canon_Flag_Add_Labels := True; + -- Force to unnest subprograms is the code generator doesn't support -- nested subprograms. if not Ortho_Nodes.Has_Nested_Subprograms then |