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,191025edd10d46a,start
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2004-02-28 11:14:03 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news.tele.dk!news.tele.dk!small.news.tele.dk!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.arcor-online.net!news.belwue.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 <guzo@stud.ics.p.lodz.pl>
Newsgroups: comp.lang.ada
Subject: import a C++ function
Date: Sat, 28 Feb 2004 20:13:54 +0100
Organization: tp.internet - http://www.tpi.pl/
Message-ID: <c1qpa6$dje$1@atlantis.news.tpi.pl>
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 1077995654 13934 195.116.185.50 (28 Feb 2004
 19:14:14 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Sat, 28 Feb 2004 19:14:14 +0000 (UTC)
User-Agent: Mozilla Thunderbird 0.5 (Windows/20040207)
X-Accept-Language: en-us, en
Xref: archiver1.google.com comp.lang.ada:5935
Date: 2004-02-28T20:13:54+01:00
List-Id: <comp.lang.ada>

Hi,
how can I import from a dll such a function written in C:

static CRuntimeClass* PASCAL Load(CArchive& ar, UINT* pwSchemaNum);

the main problem I've got is with the "PASCAL" word.
And one thing more, how to declare the CArchive class, bacause writing
type CArchive;
doesn't help. The truth is that I don't have the type CArchive written 
in Ada yet and I only want to declare it, sth. like defining in C:
class CArchive;