From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,bc4137777a63bff
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news1.google.com!proxad.net!212.101.4.254.MISMATCH!solnet.ch!solnet.ch!newsfeed01.sul.t-online.de!t-online.de!newsfeed.arcor.de!news.arcor.de!not-for-mail
Date: Wed, 03 Aug 2005 20:07:58 +0200
From: Georg Bauhaus <bauhaus@futureapps.de>
Organization: future apps GmbH
User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US;
 rv:1.7.8) Gecko/20050513 Debian/1.7.8-1
X-Accept-Language: en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Help needed for ada package
References: <1122305318.728942.304120@f14g2000cwb.googlegroups.com>
   <2OudnZo-iL1aN3jfRVn-iQ@comcast.com>
   <1122475184.849564.159870@g44g2000cwa.googlegroups.com>
   <IIudnVT7F-2b33XfRVn-vQ@comcast.com>
   <1122547648.069514.63520@g14g2000cwa.googlegroups.com>
   <BoKdnS8fwMziEXTfRVn-qA@comcast.com>
   <1122980923.842598.181310@g49g2000cwa.googlegroups.com>
   <o04ve11odsjs756915g5eonn0g1guopih2@4ax.com>
   <1123069124.562944.246730@o13g2000cwo.googlegroups.com>
   <n0o1f1lqsbi23bt7b2li6oc85r7pgfn9d5@4ax.com>
 <1123090742.323338.311230@f14g2000cwb.googlegroups.com>
In-Reply-To: <1123090742.323338.311230@f14g2000cwb.googlegroups.com>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <42f107ef$0$6973$9b4e6d93@newsread2.arcor-online.net>
NNTP-Posting-Date: 03 Aug 2005 20:07:43 MEST
NNTP-Posting-Host: 575703a1.newsread2.arcor-online.net
X-Trace: 
 DXC=TO;9ML4XNThUWaeE\nHN0lQ5U85hF6f;djW\KbG]kaMh41Ud:;E]@4cm20dQkgb>QnljUVjRQ60?bVmnOeiOY3@ng[50F7T5IOb
X-Complaints-To: abuse@arcor.de
Xref: g2news1.google.com comp.lang.ada:3939
Date: 2005-08-03T20:07:43+02:00
List-Id: <comp.lang.ada>

strictly_mk@hotmail.com wrote:
> Actually I think I fixed the majority of them, here is the package
> body; FYI  type ID is (<>);
> 
> The only problem really now is that line 91 refers to the most
> dangerous function where it says Most_Dangerous_Person := 0;
> I think the compiler is complaining about 0 being passed off as an ID.

That's right, 0 is known to belong to a universal intege type,
but (<>) says discrete type. So you cannot assume there will be
a 0.

> Line 120 refers to the return 0; in the next_member function (again I
> think its to do with 0 not being an integer) (again, is there a way
> around this?)

I think so. If there is a most dangerous person
(i.e., at least one, in math speak I think)
then this person's ID should be the one to use in identifying the person?

Not sure why you assign a default value (?) to Most_Dangerous_Person?
(If you need a default value, some ID values are available
through ID's type attributes.)