Queue problem - More specific & shorter

Queue problem - More specific & shorter

[Domgrief]

Thanks to the help of one of the wonderful people who visits this
newsgroup, I have managed to get my problem down to this. If someone
could help me out, could you please e-mail me and tell me what I'm doing
wrong?

The following code is part of a QUEUE.ADB, which is included using a
WITH clause in my program. 

My program creates a record with a field called part_two of type
integer, enqueues it, then calls a procedure display from QUEUE.ADB.

Display calls put_object in the form:

	put_object(the_queue.objects(i));

Where the_queue.objects(i) is a single record which I have queued. The
procedure put_object is:

	procedure put_object (object : object_type) is
	package integer_io is new text_io.integer_io(integer);
	begin
	   integer_io.put (object.Part_Two);
	end;

When I compile this, the compiler comes up with

	queue.adb.(line number): invalid prefix in selected component 
	"object_type"

What have I done wrong? Is this because object_type is a limited private
type (in queue.ads)? If so, is there any simple way around this without
creating a major re-structure of the code?

Any help would be appreciated,
Many thanks,
Domgrief (Nathan J)