diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-12-06 08:42:32 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-12-06 08:42:32 +0100 |
commit | ee9b40b24ba2450e52c9661136963ec3e5cf9d80 (patch) | |
tree | 00f054e98c6fdbf4bfa9e355d1abfbf3061f0541 /src/synth/synth-ieee-numeric_std.adb | |
parent | 3bf136140b218a3f9191ba6cef319bede7bf6425 (diff) | |
download | ghdl-ee9b40b24ba2450e52c9661136963ec3e5cf9d80.tar.gz ghdl-ee9b40b24ba2450e52c9661136963ec3e5cf9d80.tar.bz2 ghdl-ee9b40b24ba2450e52c9661136963ec3e5cf9d80.zip |
synth: handle static resize from std_numeric. Fix #1531
Diffstat (limited to 'src/synth/synth-ieee-numeric_std.adb')
-rw-r--r-- | src/synth/synth-ieee-numeric_std.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/synth-ieee-numeric_std.adb b/src/synth/synth-ieee-numeric_std.adb index 2c0951f3b..4c7080f5a 100644 --- a/src/synth/synth-ieee-numeric_std.adb +++ b/src/synth/synth-ieee-numeric_std.adb @@ -873,11 +873,11 @@ package body Synth.Ieee.Numeric_Std is for I in 1 .. Size loop if I <= Old_Size then - B := Read_Std_Logic (Val.Mem, I - 1); + B := Read_Std_Logic (Val.Mem, Old_Size - I); else B := Pad; end if; - Write_Std_Logic (Res.Mem, I - 1, B); + Write_Std_Logic (Res.Mem, Size - I, B); end loop; return Res; |