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,ded6ba3fc5b87b66
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2000-10-26 10:55:55 PST
Path: 
 supernews.google.com!sn-xit-02!sn-xit-01!supernews.com!newsfeed.stanford.edu!xfer10.netnews.com!netnews.com!howland.erols.net!newshub2.home.com!news.home.com!news1.frmt1.sfba.home.com.POSTED!not-for-mail
From: tmoran@bix.com
Newsgroups: comp.lang.ada
Subject: Re: First time Ada has let me down
References: <8t9fu5$hfh$1@nnrp1.deja.com>
X-Newsreader: Tom's custom newsreader
Message-ID: <Ke_J5.358394$i5.5719531@news1.frmt1.sfba.home.com>
Date: Thu, 26 Oct 2000 17:55:54 GMT
NNTP-Posting-Host: 24.20.190.201
X-Complaints-To: abuse@home.net
X-Trace: news1.frmt1.sfba.home.com 972582954 24.20.190.201 (Thu,
 26 Oct 2000 10:55:54 PDT)
NNTP-Posting-Date: Thu, 26 Oct 2000 10:55:54 PDT
Organization: @Home Network
Xref: supernews.google.com comp.lang.ada:1582
Date: 2000-10-26T17:55:54+00:00
List-Id: <comp.lang.ada>

>A binding to some C facility like TCP/IP and sockets is going to be
>chock full of addresses and/or Unchecked_Conversion's.

The 2600 line package body of Claw.Sockets has two instances
of address-access conversion, both of the form:
      P_Aliased_Data := To_Pointer(To_Address(P_Aliased_Data)
                                   + Storage_Offset(Result));
It has 10 instantiations of Unchecked_Conversion (localized in
specific routines), in two forms:
      (Interfaces.C.Char, Ada.Streams.Stream_Element);
and
      (Source => Object_Pointer, Target => Claw.Win32.Lpcstr);