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,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Thread: 103376,97d5e85b59d5e24c,start
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: g2news1.google.com!postnews2.google.com!not-for-mail
From: rhezusfactor@yahoo.com (Johnswort)
Newsgroups: comp.lang.ada
Subject: Ada equivalent to С++ header sentence.
Date: 20 Aug 2004 01:22:49 -0700
Organization: http://groups.google.com
Message-ID: <3f27506b.0408200022.76094a5e@posting.google.com>
NNTP-Posting-Host: 65.227.11.152
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: posting.google.com 1092990169 21966 127.0.0.1 (20 Aug 2004 08:22:49
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Fri, 20 Aug 2004 08:22:49 +0000 (UTC)
Xref: g2news1.google.com comp.lang.ada:2885
Date: 2004-08-20T01:22:49-07:00
List-Id: <comp.lang.ada>

I try to make a binding on an API, which has a header in C++ syntax.
As a complete moron in both C/C++, I want to grab the last straw
before giving up. So I ask for a hint: what would be the Ada
equivalent to the following:

typedef BOOL                    (_stdcall T_hcConnect)(LPSTR lszCmd);

Presumingly, LPSTR may come from Win32. Just in case, VB header
translates it into

Declare Function hbConnect Lib "hapi.dll" Alias "hcConnect" (ByVal
command As String) As Long

Thank you in advance.

P.S. Yep, almost forgot: GNAT 3.15., Win2000 sp4. API comes from
HyperChem 6, if curious.