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-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,8f1dd1c22d4d88cc X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2004-03-07 12:07:38 PST Path: archiver1.google.com!news2.google.com!fu-berlin.de!newsfeed01.sul.t-online.de!t-online.de!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail From: Szymon Guz Newsgroups: comp.lang.ada Subject: Re: import errors Date: Sun, 07 Mar 2004 21:07:49 +0100 Organization: tp.internet - http://www.tpi.pl/ Message-ID: References: NNTP-Posting-Host: hal.skynet.org.pl Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit X-Trace: atlantis.news.tpi.pl 1078690078 27078 195.116.185.50 (7 Mar 2004 20:07:58 GMT) X-Complaints-To: usenet@tpi.pl NNTP-Posting-Date: Sun, 7 Mar 2004 20:07:58 +0000 (UTC) User-Agent: Mozilla Thunderbird 0.5 (Windows/20040207) X-Accept-Language: en-us, en In-Reply-To: Xref: archiver1.google.com comp.lang.ada:6125 Date: 2004-03-07T21:07:49+01:00 List-Id: Jeff C, wrote: > "Szymon Guz" wrote in message > news:c2frbi$ac$1@nemesis.news.tpi.pl... > >>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, so I tried to do it in this way: >>the body of the procedures looks like this: >> >>procedure A(this:A_Access) is >> procedure THIS_A(this:A_Access); >> pragma Import(C,THIS_A,"AAA"); >>begin >> THIS_A(this); >>end; >> >>procedure A(this:B_Access) is >> procedure THIS_A(this:B_Access); >> pragma Import(C,THIS_A,"BBB"); >>begin >> THIS_A(this); >>end; >> >>I thought that it should work fine, but now I see that there is a >>compiler error which I don't undestand: >> >>undefined reference to 'AAA' >> >>So i've got two questions: >>what do I do wrong that I cannot import the functions in the *.adb file >>and I can in the *.ads file ? >>how can I import the functions ? > > > > I am confused. At the end of your post you indicate that you cannot import > the functions in the .adb but > you can in the .ads file? But you don't show any examples of it. The one > error you are posting something (almost) specific for is > undefined reference to 'AAA' which if I am guessing correctly is not a > compiler error at all but is a linker error since it > can not find the symbol AAA. Yea, sure, it was just a mistake: all the errors that I get are linker errors. > > 1) Do you know for sure the linker name of the procedure you want is AAA? I think so. I've checked that in the *.def file and what's more I can import it in the *.ads file, I haven't checked if it imports the function properly but there are no linker errors. > 2) Are you doing something (pragmas or linker switches to include a library > file that would contain this symbol? I think that pragma Linker_Options ("DLL.lib"); is enough > 3) You appear to be trying to bind to C++ (v.s. C) which is not very well > defined (i.e. There is no pragma Import(C++, X,X) in > the LRM). Have you done something in your C++ code to export the code to C > to make this rational? > I try to use some classes from MFC42D.DLL and unfortunately this is all C++ and I cannot change that.