From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on ip-172-31-74-118.ec2.internal X-Spam-Level: X-Spam-Status: No, score=-0.5 required=3.0 tests=BAYES_05 autolearn=ham autolearn_force=no version=3.4.5-pre1 Date: 22 Jan 93 00:38:08 GMT From: walter!obry@uunet.uu.net (Pascal Obry) Subject: Re: SOS find the bug.... Message-ID: List-Id: Christian, Like you have noticed, it's only a problem of visibility. You make the generic package visible into the package PACK1. by a : use PACK3_INST; But you didn't into the package body PACK1. (see LRM 8.4 about use clause and the visibility) > package body PACK3 is > > procedure PROC3 ( In_Record3 : in RECORD3 ) is *** Here RECORD3 is visible since it is inside the package > begin > null ; > end PROC3 ; > > end PACK3 ; > >-- if I don't use the expression >-- procedure PROC2 ( In_Record2: in RECORD2 ; >-- In_Record3: in PACK3_INST.RECORD3 ) is >-- I get a compilation error message (see below) >-- > *** Since PROC2 is outside the PACK3 ... *** you should add : use PACK3_INST; *** to have the visibility of RECORD3 > procedure PROC2 ( In_Record2: in RECORD2 ; > In_Record3: in RECORD3 ) is > begin > null ; > end PROC2 ; Hope this help, Pascal. -- ------------------------------------------------------------------------------- -- Pascal OBRY -- -- Room 2D-337 e_mail : obry@bellcore.com -- -- Bellcore -- -- 445 South Street voice : 1 - 201 829 4039 -- -- Post Office Box 1910 FAX : 1 - 201 829 5981 -- -- Morristown, New Jersey 07962-1910 -- ------------------------------------------------------------------------------- `` inheritance is surely a good answer, but who knows the question ? ''