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-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,2151e8951b93233f
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-06-23 05:14:27 PST
Path: 
 archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-02!sn-xit-05!sn-xit-01!supernews.com!news.tele.dk!small.news.tele.dk!195.27.83.146!news-FFM2.ecrc.net!news.cesnet.cz!crax.cesnet.cz!news.felk.cvut.cz!not-for-mail
From: "Sergey Koshcheyev" <serko84@hotmail.com>
Newsgroups: comp.lang.ada
Subject: Re: Put_Line for chars_ptr
Date: Sun, 23 Jun 2002 13:57:39 +0200
Organization: Czech Technical University
Message-ID: <af4d2n$1c52$1@ns.felk.cvut.cz>
References: <slrnaha10h.102.adi@drcomp.erfurt.thur.de>
NNTP-Posting-Host: m232.dkm.cz
X-Trace: ns.felk.cvut.cz 1024833431 45218 62.24.78.232 (23 Jun 2002 11:57:11
 GMT)
X-Complaints-To: usenet@ns.felk.cvut.cz
NNTP-Posting-Date: Sun, 23 Jun 2002 11:57:11 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Xref: archiver1.google.com comp.lang.ada:26623
Date: 2002-06-23T13:57:39+02:00
List-Id: <comp.lang.ada>

"Adrian Knoth" <adi@drcomp.erfurt.thur.de> wrote in message
news:slrnaha10h.102.adi@drcomp.erfurt.thur.de...
> Hi!
>
> I have a record (struct) for interfacing uname(). The record looks like
>
> type myStruct is record
>   sysname : chars_ptr;
>   nodename: chars_ptr;
>   release : chars_ptr;
>   version : chars_ptr;
>   machine : chars_ptr;
> end record;

I've just looked at the uname man page, and the structure looks like this:
struct utsname {
    char sysname[SYS_NMLN];
    char nodename[SYS_NMLN];
    char release[SYS_NMLN];
    char version[SYS_NMLN];
    char machine[SYS_NMLN];
    char domainname[SYS_NMLN];
};
There aren't pointers there, but the arrays themselves. So you should
declare your Ada structure as
type utsname is record
    sysname : char_array (1 .. SYS_NMLN);
    ...
end record;
Sergey.