From 935e8799870cda04d964b46ee72b5224fee5571c Mon Sep 17 00:00:00 2001
From: Björn Persson <bjorn@rombobjörn.se>
Date: Mon, 21 Jan 2013 20:30:48 +0100
Subject: Deleted an unused type.

---
 milter_api.adb | 1 -
 1 file changed, 1 deletion(-)

diff --git a/milter_api.adb b/milter_api.adb
index 0059a4d..48316cc 100644
--- a/milter_api.adb
+++ b/milter_api.adb
@@ -863,7 +863,6 @@ package body Milter_API is
    pragma export(C, milter_api_address_type_unknown);
 
    function Address(Endpoint : Sockaddr) return IP_Address is
-      type Unsigned_8_Pointer is access Unsigned_8;
       function milter_api_address_type(endpoint : Sockaddr) return Unsigned_8;
       procedure milter_api_ipv4_address(endpoint : in  Sockaddr;
                                         buffer   : out Byte_Array);
-- 
cgit v1.2.3