diff options
Diffstat (limited to 'src/synth/synth-disp_vhdl.adb')
| -rw-r--r-- | src/synth/synth-disp_vhdl.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/synth/synth-disp_vhdl.adb b/src/synth/synth-disp_vhdl.adb index 6736343ff..885077e6f 100644 --- a/src/synth/synth-disp_vhdl.adb +++ b/src/synth/synth-disp_vhdl.adb @@ -187,9 +187,9 @@ package body Synth.Disp_Vhdl is begin for I in 0 .. Bnd.Len - 1 loop case Bnd.Dir is - when Iir_To => + when Dir_To => Idx := Bnd.Left + Int32 (I); - when Iir_Downto => + when Dir_Downto => Idx := Bnd.Left - Int32 (I); end case; Disp_In_Converter @@ -343,9 +343,9 @@ package body Synth.Disp_Vhdl is begin for I in 0 .. Bnd.Len - 1 loop case Bnd.Dir is - when Iir_To => + when Dir_To => Idx := Bnd.Left + Int32 (I); - when Iir_Downto => + when Dir_Downto => Idx := Bnd.Left - Int32 (I); end case; Disp_Out_Converter |