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=-2.9 required=5.0 tests=BAYES_00,MAILING_LIST_MULTI
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,c76108e955e7f138
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-12-26 06:55:04 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!fr.clara.net!heighliner.fr.clara.net!freenix!enst!enst.fr!not-for-mail
From: Michal Nowak <vinnie@inetia.pl>
Newsgroups: comp.lang.ada
Subject: Re: Why won't this package compile?
Date: Wed, 26 Dec 2001 15:59:35 +0100
Organization: ENST, France
Sender: comp.lang.ada-admin@ada.eu.org
Message-ID: <mailman.1009378502.6867.comp.lang.ada@ada.eu.org>
References: <dlkW7.31460$4f7.4336955@news11-gui.server.ntli.net>
 <CYkW7.31524$4f7.4360622@news11-gui.server.ntli.net>
Reply-To: comp.lang.ada@ada.eu.org
NNTP-Posting-Host: marvin.enst.fr
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7BIT
X-Trace: avanie.enst.fr 1009378503 18445 137.194.161.2 (26 Dec 2001 14:55:03
 GMT)
X-Complaints-To: usenet@enst.fr
NNTP-Posting-Date: Wed, 26 Dec 2001 14:55:03 +0000 (UTC)
To: "comp.lang.ada usegroup->mailing list gateway" <comp.lang.ada@ada.eu.org>
Return-Path: <vinnie@inetia.pl>
In-reply-to: <CYkW7.31524$4f7.4360622@news11-gui.server.ntli.net>
X-Mailer: Calypso Version 3.20.01.01 (3)
Errors-To: comp.lang.ada-admin@ada.eu.org
X-BeenThere: comp.lang.ada@ada.eu.org
X-Mailman-Version: 2.0.6
Precedence: bulk
X-Reply-To: vinnie@inetia.pl
List-Help: <mailto:comp.lang.ada-request@ada.eu.org?subject=help>
List-Post: <mailto:comp.lang.ada@ada.eu.org>
List-Subscribe: <http://ada.eu.org/mailman/listinfo/comp.lang.ada>,
	<mailto:comp.lang.ada-request@ada.eu.org?subject=subscribe>
List-Id: comp.lang.ada mail<->news gateway <comp.lang.ada.ada.eu.org>
List-Unsubscribe: <http://ada.eu.org/mailman/listinfo/comp.lang.ada>,
	<mailto:comp.lang.ada-request@ada.eu.org?subject=unsubscribe>
Errors-To: comp.lang.ada-admin@ada.eu.org
X-BeenThere: comp.lang.ada@ada.eu.org
Xref: archiver1.google.com comp.lang.ada:18305
Date: 2001-12-26T15:59:35+01:00

On 01-12-26 at 14:15 Liddle Feesh wrote:

>In addition, I've created a package body for the program as below...
>
>Still getting errors apon errors - a parse error, plus errors for not
>completing the specification -> which to my best knowledge and ability is
>complete.
>
>Does >anyone< have any pointers?

Just another one newbie will try to give you some access :-))

It may be a little hard, because you did not gave the errors,
that you got, but what I can say from code inspection:

>package body Queue_Package is
>
>  procedure add is
>  begin
>  -- put_Line("Queue_Package Add node procedure");

If you want to use Put_Line you should with Ada.Text_IO
and use Ada.Text_IO;

>  end add;
>
>  procedure remove is
>  begin
>  -- Put_Line("Queue_Package Remove node procedure");
>  end Remove;
>
>  procedure initalise is
>  begin

There cannot be nothing here.
If you want the precedure do nothing,
write just:
null;
>  end initalise;
>
>  procedure is_empty_Queue
>  begin
>
>  end is_empty_Queue;
>
>end Queue_Package;

And what is the specification?

BTW, in some previous mail you wrote, that you are not using
GNAT, because it is not working on your system.
What version of GNAT and from did you got it from? 

Mike
-----------------------------------------
                             ____|
                             \%/ |~~\
  O                                  |
 o>>        Mike Nowak               |
 T                                   |
/ >       vinnie@inetia.pl           |
http://www.geocities.com/vinnie14pl _|__