Re: Newbie question: Testing a generic package

[Ludovic Brenta <ludovic.brenta@tiscali.be>]

"strictly_mk@hotmail.com" <strictly_mk@hotmail.com> writes:
> Some of you have guided me to finish this code I was working on which
> finaly compiles. What I want to know is, how do I test it? Since it is
> a generic package, how do I get the procedures to work so I can test
> them?
> I'm not to concerned if they actually work or not, i just need to show
> that it has been tested. Any suggestions?

You need to create an instance of the generic package, and then call
the subprograms from the instance.

> --specification
> generic
> 	type ID is (<>);
> package PoP is
[...]
> end PoP;


with Pop;
procedure Test_Driver is
   type Person_ID is range 1 .. 1_000_000;
   package Instance_Of_Pop is new Pop (ID => Person_ID);
begin
   Instance_Of_Pop.Reset;
   ...
end Test_Driver;

-- 
Ludovic Brenta.