From 8aa863512adaba4d6394f7bfd1f37198d0d96f1b Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 6 Mar 2020 07:55:40 +0100
Subject: Remove redundant pragma inline.

---
 src/synth/synth-source.ads | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src')

diff --git a/src/synth/synth-source.ads b/src/synth/synth-source.ads
index c7f1d3d83..1b6466218 100644
--- a/src/synth/synth-source.ads
+++ b/src/synth/synth-source.ads
@@ -42,5 +42,4 @@ package Synth.Source is
    --  Set only if not yet set.
    procedure Set_Location_Maybe (Inst : Netlists.Instance; Src : Syn_Src);
    procedure Set_Location_Maybe (N : Netlists.Net; Src : Syn_Src);
-   pragma Inline (Set_Location);
 end Synth.Source;
-- 
cgit v1.2.3