Re: Enormous problems in one of my programs!

["Liao Choon Way" <choonway@stts.com.sg>]

Haa haa... replies seem to come from people who have quite some experience
teaching... giving away some hints but not too much as to spoon-feed...

As a software engineer I'd rarely have that kind of patience... if someone
asks me about Ada (we're mostly a C/C++ shop) I'd

1. Spoonfeed him so he/she doesn't bother me anymore... but usually they
suffer indigestion.
2. Tell him/her I'm busy and I look for them when I'm free...

"Stephen Leake" <stephen.a.leake.1@gsfc.nasa.gov> wrote in message
news:ud6vlmprn.fsf@gsfc.nasa.gov...
> b99andla@student.his.se (Kladde) writes:
>
> > Helllo! I have a home assignment in ADA, and sice Im not used to this
> > language I need some help, I would be very greatful. Below I will
> > insert a start, header and body file and any faults or problems you
> > can find I will be very happy for. Under the code I will insert the
> > compile failures I get when trying to compile.
> >
> > All help is greatly appreciated!!
>
> The biggest problem is the syntax for a protected body. Also, you have
> "Island_T" in the spec, but "Island" in the body. Fix those problems,
> and you'll get more helpful errors from the compiler.
>
> Here is the correct syntax for the body of Island_T:
>
>    protected body Island_T is
>
>       entry Get_Random_Female(hona: out Server_P) when True is
>       begin
>          hona := honor(par);
>          return;
>       end Get_Random_Female;
>
>
>       procedure Breed is
>       begin
>          if(par <= 100) then
>             hanar(par) := new Male;
>             honor(par) := new Female;
>             par := par+1;
>          end if;
>       end Breed;
>
>    end Island_T;
>
> The compiler still reports errors here, but you should be able to
> figure them out.
>
>
> --
> -- Stephe