From da6dd57e9e5ee865cbd0cc9246eebcad957adae6 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 5 Oct 2017 20:42:22 +0200
Subject: python binding: add interfaces.

---
 src/name_table.ads | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/name_table.ads')

diff --git a/src/name_table.ads b/src/name_table.ads
index 16bfc2bcd..53aedc6dc 100644
--- a/src/name_table.ads
+++ b/src/name_table.ads
@@ -39,6 +39,10 @@ package Name_Table is
    --    backslashes are simplified.
    function Get_Identifier (Str: String) return Name_Id;
 
+   --  Likewise, but with a C compatible interface.
+   function Get_Identifier_With_Len (Str : Thin_String_Ptr; Len : Natural)
+                                    return Name_Id;
+
    --  Get the string associed to a name.  The first bound is 1.
    --  If the name is a character, then single quote are added.
    function Image (Id: Name_Id) return String;
-- 
cgit v1.2.3