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=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,22c22bbd068993f0
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news4.google.com!news.glorb.com!newsfeed-east.nntpserver.com!nntpserver.com!newsfeed-west.nntpserver.com!falcon.america.net!eagle.america.net.POSTED!not-for-mail
From: Larry Hazel <lhhazel@otelco.net>
User-Agent: Mozilla Thunderbird 1.0.2 (Windows/20050317)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Generic and visibility...
References: <1118439252.943218.290110@g43g2000cwa.googlegroups.com>
In-Reply-To: <1118439252.943218.290110@g43g2000cwa.googlegroups.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <w_qqe.782$D83.7147@eagle.america.net>
Date: Fri, 10 Jun 2005 20:18:00 -0500
NNTP-Posting-Host: 66.0.32.41
X-Trace: eagle.america.net 1118452764 66.0.32.41 (Fri,
 10 Jun 2005 21:19:24 EDT)
NNTP-Posting-Date: Fri, 10 Jun 2005 21:19:24 EDT
Organization: 24hoursupport.com
Xref: g2news1.google.com comp.lang.ada:11284
Date: 2005-06-10T20:18:00-05:00
List-Id: <comp.lang.ada>

e.coli wrote:
> my program is structured like this:
> 
> --bar.ads
> package Bar is
>    generic
>       with procedure Quuz;
>    package Baz is
> 
>       task type Dummy is
>          entry Run;
>       end Dummy;
> 
>       type Ptr_Dummy is access Dummy;
> 
>       procedure Quz (
>             X :    out Ptr_Dummy );
> 
>    end Baz;
>  end Bar;
> 
> --bar.adb
> with Ada.Text_Io;
> 
> package body Bar is
>     T_Array : array (Integer range 1 .. 10) of Baz.Ptr_Dummy; --error
>    package body Baz is
> 
>       task body Dummy is
>       begin
>          accept Run do
>             Ada.Text_Io.Put_Line
>                (Item => "Hello, Word!");
>             Quuz; --generic procedure
>          end Run;
>       end Dummy;
> 
>       procedure Quz (
>             X :    out Ptr_Dummy ) is
>       begin
>          X := new Dummy;
>       end Quz;
> 
>    end Baz;
> end Bar;
> 
> 
> why i can't acces to Baz.Ptr_Dummy?
> my deal is see the task pointer X outside Baz package.
> 
> thanks
> 
There is no package Baz, thus no Baz.Ptr_Dummy.  You must instanciate 
the generic package and reference the Ptr_Dummy in that package.