Re: import errors

[Stephen Leake <stephen_leake@acm.org>]

Szymon Guz <guzo@stud.ics.p.lodz.pl> writes:

> Hi,
> I'm trying to make a binding to a dll library written in C++ and I'va
> got a problem. I have two types in one package and two procedures that
> are named the same:
> 
> type A;
> type B is new A;
> 
> procedure A(this:A_Access);
> procedure A(this:B_Access);
> 
> and now I want to import them from the dll library, but writing sth
> like this:
> 
> pragma Import(C,A,"AAA");
> pragma Import(C,A,"BBB");
> 
> generates some compiler errors, 

One solution to this is to use a renames:

procedure AAA (This : A_Access);
pragma Import (C, AAA, "AAA");
procedure A (This : A_Access) renames AAA;

similarly for the other A.

-- 
-- Stephe