diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-04-30 16:47:18 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-04-30 16:47:18 +0200 |
| commit | 89a364a5fb48e9ef0f7a30b94adaa4c64c6faa18 (patch) | |
| tree | 0ea12e17b43bf34f173b88825a73fa6eade3b8f9 /src/synth/elab-vhdl_objtypes.ads | |
| parent | 399f99cb22ca3fc54f5b9adc85c0cabaae1328c4 (diff) | |
| download | ghdl-89a364a5fb48e9ef0f7a30b94adaa4c64c6faa18.tar.gz ghdl-89a364a5fb48e9ef0f7a30b94adaa4c64c6faa18.tar.bz2 ghdl-89a364a5fb48e9ef0f7a30b94adaa4c64c6faa18.zip | |
elab-vhdl_objtypes: fix restart of libghdl
Diffstat (limited to 'src/synth/elab-vhdl_objtypes.ads')
| -rw-r--r-- | src/synth/elab-vhdl_objtypes.ads | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/synth/elab-vhdl_objtypes.ads b/src/synth/elab-vhdl_objtypes.ads index 434fc7044..476264f37 100644 --- a/src/synth/elab-vhdl_objtypes.ads +++ b/src/synth/elab-vhdl_objtypes.ads @@ -298,14 +298,15 @@ package Elab.Vhdl_Objtypes is function Unshare (Src : Memtyp) return Memtyp; - procedure Init; + procedure Initialize; + procedure Finalize; - -- Set by Init. + -- Set by Initialize. Boolean_Type : Type_Acc := null; Logic_Type : Type_Acc := null; Bit_Type : Type_Acc := null; - -- Also set by init. + -- Also set by initialize. Bit0 : Memtyp; Bit1 : Memtyp; end Elab.Vhdl_Objtypes; |