diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-01-14 09:42:00 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-01-14 09:42:00 +0100 |
commit | 7052ac9006b145c0cd51f2bad8e088c1338f3846 (patch) | |
tree | f64dc8ee4a4e2d308937182ca6e354156f5c211a /src/synth/synth-vhdl_expr.ads | |
parent | 4d1eef97f13ee160e78eda631c5be1480c5f538c (diff) | |
download | ghdl-7052ac9006b145c0cd51f2bad8e088c1338f3846.tar.gz ghdl-7052ac9006b145c0cd51f2bad8e088c1338f3846.tar.bz2 ghdl-7052ac9006b145c0cd51f2bad8e088c1338f3846.zip |
synth: improve error propagation on slices
Diffstat (limited to 'src/synth/synth-vhdl_expr.ads')
-rw-r--r-- | src/synth/synth-vhdl_expr.ads | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-vhdl_expr.ads b/src/synth/synth-vhdl_expr.ads index c991f388a..964c237f5 100644 --- a/src/synth/synth-vhdl_expr.ads +++ b/src/synth/synth-vhdl_expr.ads @@ -121,7 +121,8 @@ package Synth.Vhdl_Expr is El_Typ : Type_Acc; Res_Bnd : out Bound_Type; Inp : out Net; - Off : out Value_Offsets); + Off : out Value_Offsets; + Error : out Boolean); -- If VOFF is No_Net then OFF is valid, if VOFF is not No_Net then -- OFF is 0. |