From sysmaint@contek.com  Sun Aug  5 14:04:35 2007
Return-Path: <sysmaint@contek.com>
Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:4f8:fff6::34])
	by hub.freebsd.org (Postfix) with ESMTP id 13B1F16A417
	for <FreeBSD-gnats-submit@freebsd.org>; Sun,  5 Aug 2007 14:04:35 +0000 (UTC)
	(envelope-from sysmaint@contek.com)
Received: from smtp02.lnh.mail.rcn.net (smtp02.lnh.mail.rcn.net [207.172.157.102])
	by mx1.freebsd.org (Postfix) with ESMTP id D862D13C468
	for <FreeBSD-gnats-submit@freebsd.org>; Sun,  5 Aug 2007 14:04:34 +0000 (UTC)
	(envelope-from sysmaint@contek.com)
Received: from mr02.lnh.mail.rcn.net ([207.172.157.22])
  by smtp02.lnh.mail.rcn.net with ESMTP; 05 Aug 2007 10:04:34 -0400
Received: from smtp01.lnh.mail.rcn.net (smtp01.lnh.mail.rcn.net [207.172.4.11])
	by mr02.lnh.mail.rcn.net (MOS 3.8.3-GA)
	with ESMTP id NQC43387;
	Sun, 5 Aug 2007 10:04:34 -0400 (EDT)
Received: from 207-172-216-55.s817.apx1.sbo.ma.dialup.rcn.com (HELO mail.contek.com) ([207.172.216.55])
  by smtp01.lnh.mail.rcn.net with ESMTP; 05 Aug 2007 10:04:31 -0400
Received: by mail.contek.com (Postfix, from userid 10112)
	id 5512439821; Sun,  5 Aug 2007 08:09:40 -0400 (EDT)
Message-Id: <20070805120940.5512439821@mail.contek.com>
Date: Sun,  5 Aug 2007 08:09:40 -0400 (EDT)
From: Douglas Wells <sysmaint@contek.com>
Reply-To: Douglas Wells <sysmaint@contek.com>
To: FreeBSD-gnats-submit@freebsd.org
Cc: sysmaint@contek.com
Subject: Ada florist socket program doesn't compile due to internal error
X-Send-Pr-Version: 3.113

>Number:         115217
>Category:       ports
>Synopsis:       Ada devel/florist socket program doesn't compile due to internal error
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-ports-bugs
>State:          closed
>Quarter:        
>Keywords:       
>Date-Required:  
>Class:          sw-bug
>Submitter-Id:   current-users
>Arrival-Date:   Sun Aug 05 14:10:01 GMT 2007
>Closed-Date:    Fri Jun 13 22:26:42 UTC 2008
>Last-Modified:  Fri Jun 13 22:26:42 UTC 2008
>Originator:     Douglas Wells
>Release:        FreeBSD 6.2-RELEASE-p1 i386
>Organization:
>Environment:
System: FreeBSD flame.contek.com 6.2-RELEASE-p1 FreeBSD 6.2-RELEASE-p1 #0: Sun Feb 11 18:14:07 EST 2007 root@flame.contek.com:/other5/src.6.2/sys/i386/compile/FLAME.6.2 i386


	
	GNAT: gnat-3.15p_1 / gnat-gcc-3.4.6_3
	florist: florist-3.15p_1
		(tools installed via ports compilation)
>Description:
	A simple Ada program using devel/florist to access POSIX
	sockets encounters the error:

		posix-sockets-internet.gpb:660:15: duplication of choice value at line 659
		posix-sockets-internet.gpb:674:15: duplication of choice value at line 673
		gnatmake: "/usr/local/lib/florist/posix-sockets-internet.adb" compilation error

	Note that posix-sockets-internet is internal to florist.

>How-To-Repeat:
	Use the command:
		gnatmake -I/usr/local/lib/florist px_socket.adb
	with this test program:
	------------------------- px_socket.adb -------------------
	with POSIX.Sockets;
	with POSIX.Sockets.Internet;

	procedure px_socket is
		package PS renames POSIX.Sockets;
		package PSI renames POSIX.Sockets.Internet;

		sockfamily : PS.Protocol_Family := PSI.Internet_Protocol;
	begin
		null;
	end px_socket;
	----------------------- end px_socket.adb -----------------
>Fix:
	The problem seems to arise from a case statement that has
	duplicate selectors based on the IP type-of-server IPTOS_*
	values, each of which has the value 0.  This problem in turn
	is caused by a questionable tactic in the internal translation
	code in c-posix.c, which provides a default value of 0 for
	any C define that it is unable to locate.

	The problem here is that the translation process does not have
	access to the include file <netinet/ip.h>.  A workaround is to
	patch pconfig.h (after make config) to define near the top:
		#define __BSD_VISIBLE   1
	and to include near the other netinet includes:
		#include <netinet/ip.h>

	With this change the test program and several other more
	complicated programs compile and execute properly.  This
	problem may or may not be more cleanly resolved via
	appropriate changes to the configure mechanism.
>Release-Note:
>Audit-Trail:
State-Changed-From-To: open->closed 
State-Changed-By: linimon 
State-Changed-When: Sun Aug 5 16:31:41 UTC 2007 
State-Changed-Why:  
Duplicate of ports/115216. 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
State-Changed-From-To: closed->open 
State-Changed-By: edwin 
State-Changed-When: Sun Aug 5 22:35:19 UTC 2007 
State-Changed-Why:  
reopen on submitters request. 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
Responsible-Changed-From-To: freebsd-ports-bugs->alepulver 
Responsible-Changed-By: alepulver 
Responsible-Changed-When: Sun Sep 30 20:24:58 UTC 2007 
Responsible-Changed-Why:  
I'll take it. 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
State-Changed-From-To: open->suspended 
State-Changed-By: alepulver 
State-Changed-When: Sun Sep 30 22:49:58 UTC 2007 
State-Changed-Why:  
The 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
State-Changed-From-To: suspended->open 
State-Changed-By: alepulver 
State-Changed-When: Sun Sep 30 22:58:31 UTC 2007 
State-Changed-Why:  
Ops, wrong message (quotes removed by 'ssh'). 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
State-Changed-From-To: open->suspended 
State-Changed-By: alepulver 
State-Changed-When: Sun Sep 30 22:58:48 UTC 2007 
State-Changed-Why:  
The lang/gnat distfiles have been replaced by new ones, wait for a port 
update. 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
Responsible-Changed-From-To: alepulver->freebsd-ports-bugs 
Responsible-Changed-By: alepulver 
Responsible-Changed-When: Sun Oct 21 17:58:42 UTC 2007 
Responsible-Changed-Why:  
Leave PR (no time; if the required port is updated or there is a mirror 
somewhere, let me know and I will handle it). 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 

From: Felippe de Meirelles Motta <lippe@FreeBSD.org>
To: Douglas Wells <sysmaint@contek.com>, bug-followup@FreeBSD.org
Cc:  
Subject: Re: ports/115217: Ada devel/florist socket program doesn't compile
 due to internal error
Date: Fri, 6 Jun 2008 02:38:03 -0300

 --Sig_/6ix/7mRk9mQ5MwvDjBOS4sn
 Content-Type: text/plain; charset=US-ASCII
 Content-Transfer-Encoding: quoted-printable
 
 Hi Submitter,
 
 After last updates on this port, can you confirm us if that problem was
 solved?
 
 Thanks for your contribution to the FreeBSD Project! :)
 
 --=20
 lippe@FreeBSD.org
 Felippe de Meirelles Motta
 
 --Sig_/6ix/7mRk9mQ5MwvDjBOS4sn
 Content-Type: application/pgp-signature; name=signature.asc
 Content-Disposition: attachment; filename=signature.asc
 
 -----BEGIN PGP SIGNATURE-----
 Version: GnuPG v2.0.8 (FreeBSD)
 
 iEYEARECAAYFAkhIzTsACgkQEv+IlQvbYkravACdHu3fzrWZf2mbVViiBDJdNdBz
 D6kAoKaHKtxWdCSQwzg470nX1zDOFcfm
 =KWmD
 -----END PGP SIGNATURE-----
 
 --Sig_/6ix/7mRk9mQ5MwvDjBOS4sn--

From: sysmaint@contek.com (Douglas Wells)
To: lippe@FreeBSD.org
Cc: Douglas Wells <sysmaint@contek.com>, bug-followup@FreeBSD.org
Subject: Re: ports/115217: Ada devel/florist socket program doesn't
 compile due to internal error
Date: Fri, 13 Jun 2008 10:43:38 -0400 (EDT)

 > Hi Submitter,
 > 
 > After last updates on this port, can you confirm us if that problem was
 > solved?
 > 
 > Thanks for your contribution to the FreeBSD Project! :)
 > 
 > -- 
 > lippe@FreeBSD.org
 > Felippe de Meirelles Motta
 
 I don't understand what updates have been made to the devel/florist
 port (I am still using gnat-3.15p_1).  Nonetheless, in response
 to a similar inquiry last September, I made the following reply:
 
 % In any case, I should note that I just reran the bug tests and a
 % least the simpler programs (px_true and px_false) now work.  I
 % don't quite see what the difference is, but since I filed the bug
 % the lang/gnat-gcc34 port has been eliminated, and I have installed
 % lang/gnat-gcc42 port in parallel with lang/gnat.  It looks to me
 % as though the two gnat ports ought to be able to coexist without
 % interference but clearly something is different.
 
 I have just reverified that the test programs still work.  (That
 is, the test program that failed when I originally submitted it
 was working properly last September and continues to work properly
 today.)
 
 I continue to be mystified about what actually changed in the
 FreeBSD system to actually fix the problem.
 
 But, in summary, the problem has been solved and the bug report
 can be closed.
 
  - dmw
 
State-Changed-From-To: suspended->closed 
State-Changed-By: lippe 
State-Changed-When: Fri Jun 13 22:26:41 UTC 2008 
State-Changed-Why:  
Problem solved, according submitter! 

http://www.freebsd.org/cgi/query-pr.cgi?pr=115217 
>Unformatted:
