Re: Why can't i get an EXE!

["Phoenix." <david.judge1@ntlworld.com1>]

"Preben Randhol" <randhol+abuse@pvv.org> wrote in message
news:slrna3f7va.ke.randhol+abuse@kiuk0156.chembio.ntnu.no...
> On Sat, 5 Jan 2002 23:33:58 -0000, NTL wrote:
> > Package: QUE PACKAGE
> >
> > Hi
> > I am a university student studying computer science's and have to create
a
> > small program as part of my coursework
> > The program below compiles perfectly and builds in ADAGIDE GNAT3.11,
> > however, I can not get it to create the .C and .EXE files... am I making
> > some small fundemental mistake.
>
> Yes you must make a file that contains the main procedure. Move to this
> procedure the code you have put in que.adb (see below). You will have to
> with and use your que package too.
>

Hi, what has to go into this other file, as i created a file called
main.adb, containing
use que;
and the code below.
however it asks for a main.ads file. and I am unsure what goes in here, as
if i put the procedure declarations, it will not compile.
thanks for the help...

David

> Check this link : http://www.it.bton.ac.uk/staff/je/adacraft/
>
> >
> > begin
> >    loop
> >       initialiser(q => qs, head => heads, tail => tails);
> >       Put_Line("****************************");
> >       Put_Line("   1). Add to queue");
> >       Put_Line("   2). remove to queue");
> >       Put_Line("   3). Quit queue program");
> >       Put_Line("****************************");
> >       get(A);
> >       case A is --Execute menu option depending on A's value
> >          when 1      => add(q => qs, head => heads, tail => tails);
> >          when 2      => remove(q => qs, head => heads, tail => tails);
> >          when 3      => exit;
> >          when others => Put_Line("Sorry incorrect entry please retry");
> >       end case;
> >    end loop;
>
> Preben
> --
>  ()   Join the worldwide campaign to protect fundamental human rights.
> '||}
> {||'                                           http://www.amnesty.org/