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-Thread: 103376,1b41412c7bc28c47
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news2.google.com!newsfeed.stanford.edu!headwall.stanford.edu!newshub.sdsu.edu!newsfeed.straub-nv.de!newsfeed01.sul.t-online.de!t-online.de!newsfeed.arcor.de!newsspool4.arcor-online.net!news.arcor.de.POSTED!not-for-mail
Date: Thu, 07 Aug 2008 12:10:17 +0200
From: Georg Bauhaus <rm.dash-bauhaus@futureapps.de>
User-Agent: Thunderbird 2.0.0.16 (Macintosh/20080707)
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Suffix _T for types found good
References: <2e9ebb23-a68b-43cf-8871-febcb173f951@56g2000hsm.googlegroups.com>
 	<IHmmk.286534$yE1.220045@attbi_s21>
 <188191be-d2c6-4d94-8d6b-082015954332@t54g2000hsg.googlegroups.com>
 	<489A0440.9080201@obry.net>
 <594cdbb8-4018-44bd-a8db-0df3f23df247@z72g2000hsb.googlegroups.com>
 	<489aa138$0$20716$9b4e6d93@newsspool4.arcor-online.net>
 <bbb0cc4e-351a-4500-97ef-3b5fb9bd48ce@a1g2000hsb.googlegroups.com>
In-Reply-To: 
 <bbb0cc4e-351a-4500-97ef-3b5fb9bd48ce@a1g2000hsb.googlegroups.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <489aca09$0$12946$9b4e6d93@newsspool2.arcor-online.net>
Organization: Arcor
NNTP-Posting-Date: 07 Aug 2008 12:10:17 CEST
NNTP-Posting-Host: be37a7fe.newsspool2.arcor-online.net
X-Trace: 
 DXC=;THOXNM9GKDI7\_^6>c20JA9EHlD;3YcB4Fo<]lROoRA4nDHegD_]REST;cZN9T0nB;9OJDO8_SKFNSZ1n^B98iJaWF6kT]RIUL
X-Complaints-To: usenet-abuse@arcor.de
Xref: g2news1.google.com comp.lang.ada:1497
Date: 2008-08-07T12:10:17+02:00
List-Id: <comp.lang.ada>

amado.alves@gmail.com schrieb:
> procedure Complex_Logic_With_An_Input_Stream_And_An_Output_Stream is
>    Input_Stream : Stream;
>    Output_Stream : Stream;
>    -- ...
>    -- OK

The declarations say little about the streams, other than
their direction;
everything else about the streams has to be said in comments,
and later looked up in comments, thus extending the "lexicon"
way more, and less formally, than by choosing, say,

    Cam_Corder: Input_Stream;
    Null_Device: Output_Stream;


When they are used, another aspect appears. Compare

    Temp'Write(Stream => Null_Device);

to

    Temp'Write(Stream => Output_Stream);

The second line, using "Output_Stream" as an object name,
needs a back reference, as a consequence of being general.
The first line does not need this kind of lookup, I think.


> procedure Complex_Logic_With_Only_An_Input_Stream is
>    Stream : Stream_T;

This anonymity does not even indicate the direction of data flow.
It can be understood only if there is nothing to
understand, which is what you will have to understand first!
;-) ;-)




--
Georg Bauhaus
Y A Time Drain  http://www.9toX.de