diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-09-19 06:21:53 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-09-19 06:32:17 +0200 |
| commit | b93769c93d695b4dc77199bdab041da50b1fb5ff (patch) | |
| tree | 66186b8e57c53bd7ac5cb3cb1f17c61479a90d3f /src/synth/synthesis.adb | |
| parent | f659edc23a249a35e78956054afed0fdc256d127 (diff) | |
| download | ghdl-b93769c93d695b4dc77199bdab041da50b1fb5ff.tar.gz ghdl-b93769c93d695b4dc77199bdab041da50b1fb5ff.tar.bz2 ghdl-b93769c93d695b4dc77199bdab041da50b1fb5ff.zip | |
synth: make synth_instance_type private.
Diffstat (limited to 'src/synth/synthesis.adb')
| -rw-r--r-- | src/synth/synthesis.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/synthesis.adb b/src/synth/synthesis.adb index a854c34cc..13371b122 100644 --- a/src/synth/synthesis.adb +++ b/src/synth/synthesis.adb @@ -63,7 +63,7 @@ package body Synthesis is if Parent_Inst /= Global_Instance then Create_Object (Parent_Inst, Pkg, Val); else - Parent_Inst.Objects (Info.Pkg_Slot) := Val; + Create_Package_Object (Parent_Inst, Pkg, Val); end if; Synth_Declarations (Syn_Inst, Get_Declaration_Chain (Pkg)); if Pkg = Vhdl.Std_Package.Standard_Package then |