diff options
| -rw-r--r-- | src/synth/netlists.adb | 7 | ||||
| -rw-r--r-- | src/synth/netlists.ads | 1 |
2 files changed, 0 insertions, 8 deletions
diff --git a/src/synth/netlists.adb b/src/synth/netlists.adb index 5ff0dfec6..b2188e822 100644 --- a/src/synth/netlists.adb +++ b/src/synth/netlists.adb @@ -105,13 +105,6 @@ package body Netlists is return Snames_Table.Table (Name).Suffix; end Get_Sname_Version; - function Get_Sname_Num (Name : Sname) return Uns32 is - begin - pragma Assert (Is_Valid (Name)); - pragma Assert (Get_Sname_Kind (Name) = Sname_Artificial); - return Snames_Table.Table (Name).Suffix; - end Get_Sname_Num; - -- Modules diff --git a/src/synth/netlists.ads b/src/synth/netlists.ads index 0b54c0a9e..7d2b2824d 100644 --- a/src/synth/netlists.ads +++ b/src/synth/netlists.ads @@ -66,7 +66,6 @@ package Netlists is function Get_Sname_Prefix (Name : Sname) return Sname; function Get_Sname_Suffix (Name : Sname) return Name_Id; function Get_Sname_Version (Name : Sname) return Uns32; - function Get_Sname_Num (Name : Sname) return Uns32; -- Modifies an Sname. procedure Set_Sname_Prefix (Name : Sname; Prefix : Sname); |