Question about Ada renaming...

[stluka@software.org (Fred Stluka)]

Here is a question for the Ada gurus.

The Apollo (Verdix) Ada compiler accepts it;
the VAX Ada compiler reports errors at compile time.

Which is correct?

-----------------------------------

package aaa is 
    type int is new integer;
end;

with aaa;
package bbb is
    procedure proc (param : in out aaa.int);
end bbb;

with aaa;
with bbb;
procedure ccc is
    package a renames aaa;
    local_int : integer;
begin
    bbb.proc (aaa.int (local_int));   -- Works fine.
    bbb.proc (a.int (local_int));     -- Doesn't compile on VAX.
end ccc;

-----------------------------------

VAX Ada error messages:

Line  17:           bbb.proc (a.int (local_int));     -- Doesn't compile on VAX.
%ADAC-E-CONFDIFFNAME, Name a is not the same as aaa in bbb at line 7 [LRM 6.3.1]

Line  17:           bbb.proc (a.int (local_int));     -- Doesn't compile on VAX.
%ADAC-I-CONFWITHTYPEMAR, Error detected during conformance check with type mark 
        of subprogram 'in out' formal param in bbb at line 7

-----------------------------------

The referenced Ada RM section seems relevant.  To paraphrase:

     6.3.1(6)   Such conformance is required for type conversions
                used as actual parameters (see 6.4.1).

     6.4.1(3)   For a type conversion used as an actual parameter 
                of mode in out the type mark must conform (see 6.3.1)
                to the type mark of the formal parameter.

The heart of my question is:

     Should this usage (referring to the type mark via a renaming
     declaration) be considered a case of nonconformance?

If so, is there a way around this problem, other than the "Works fine"
line above, or a use clause?  This is abstracted out from a much more
complicated example in a large system where we use a standard set of
renames across the project.

--Fred
-- 

Fred Stluka                              Internet: stluka@software.org
Software Productivity Consortium         UUNET:    ...!uunet!software!stluka
2214 Rock Hill Rd, Herndon VA 22070 USA