diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-09-18 07:07:27 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-09-18 18:45:25 +0200 |
| commit | 1b8c3d64e07584ffcd60f2d13634e6285e3cc7ef (patch) | |
| tree | 1d9f47c3896738ec3e4450b796b71d210fe5eada /src/synth/netlists-locations.ads | |
| parent | 48396102d53ed1c10a750a14ff75364d5c533e10 (diff) | |
| download | ghdl-1b8c3d64e07584ffcd60f2d13634e6285e3cc7ef.tar.gz ghdl-1b8c3d64e07584ffcd60f2d13634e6285e3cc7ef.tar.bz2 ghdl-1b8c3d64e07584ffcd60f2d13634e6285e3cc7ef.zip | |
synth: improve locations tracking.
Diffstat (limited to 'src/synth/netlists-locations.ads')
| -rw-r--r-- | src/synth/netlists-locations.ads | 5 |
1 files changed, 5 insertions, 0 deletions
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; |