diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-04-07 21:16:05 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-04-09 21:24:35 +0200 |
commit | 644d4ecd655d1f9892d0db709bde07015ef3424a (patch) | |
tree | a8b5e4e2c9a0a7411ac0fb3f69ad61e0191f6a33 | |
parent | 155bef86e2367f3d55417612c6de50c7d1b2b11b (diff) | |
download | ghdl-644d4ecd655d1f9892d0db709bde07015ef3424a.tar.gz ghdl-644d4ecd655d1f9892d0db709bde07015ef3424a.tar.bz2 ghdl-644d4ecd655d1f9892d0db709bde07015ef3424a.zip |
synth-values.ads: minor cleanup
-rw-r--r-- | src/synth/synth-values.ads | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/src/synth/synth-values.ads b/src/synth/synth-values.ads index ffb554717..95f7f3f0d 100644 --- a/src/synth/synth-values.ads +++ b/src/synth/synth-values.ads @@ -189,15 +189,6 @@ package Synth.Values is type Value_Acc is access Value_Type; - type Value_Type_Array is array (Iir_Index32 range <>) of Value_Acc; - - type Value_Array_Type (Ln : Iir_Index32) is record - -- Values are from left to right. So V(1) is at index 'Left. - V : Value_Type_Array (1 .. Ln); - end record; - - type Value_Array_Acc is access Value_Array_Type; - type Heap_Index is new Uns32; Null_Heap_Index : constant Heap_Index := 0; |