From 855524690a5d85b14ae0769885f2f950c5b88158 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Wed, 21 Sep 2022 03:15:48 +0200 Subject: synth-vhdl_insts: move pragma unreferenced --- src/synth/synth-vhdl_insts.adb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/synth/synth-vhdl_insts.adb b/src/synth/synth-vhdl_insts.adb index 10c355032..fc9788f78 100644 --- a/src/synth/synth-vhdl_insts.adb +++ b/src/synth/synth-vhdl_insts.adb @@ -726,7 +726,6 @@ package body Synth.Vhdl_Insts is N_Off : Uns32; N : Net; Base : Valtyp; - pragma Unreferenced (Base); Offs : Value_Offsets; Dyn : Dyn_Name; begin @@ -752,6 +751,8 @@ package body Synth.Vhdl_Insts is Iassoc := Get_Chain (Iassoc); end loop; + pragma Unreferenced (Base); + -- Then: -- 1. sort table by offset Sort_Value_Offset (Els); -- cgit v1.2.3