From 1b8c3d64e07584ffcd60f2d13634e6285e3cc7ef Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 18 Sep 2019 07:07:27 +0200
Subject: synth: improve locations tracking.

---
 src/synth/netlists-locations.ads | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src/synth/netlists-locations.ads')

diff --git a/src/synth/netlists-locations.ads b/src/synth/netlists-locations.ads
index 9bc7d55f1..1990a8b67 100644
--- a/src/synth/netlists-locations.ads
+++ b/src/synth/netlists-locations.ads
@@ -28,4 +28,9 @@ package Netlists.Locations is
    --  Get the previously saved location for INST.
    --  Return Null_Location if no location set or locations are disabled.
    function Get_Location (Inst : Instance) return Location_Type;
+
+   --  Utilities.
+   procedure Copy_Location (Dest : Net; Src : Net);
+   procedure Copy_Location (Dest : Net; Src : Instance);
+   pragma Inline (Copy_Location);
 end Netlists.Locations;
-- 
cgit v1.2.3