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=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.107.51.209 with SMTP id z200mr10031336ioz.32.1506956204676;
        Mon, 02 Oct 2017 07:56:44 -0700 (PDT)
X-Received: by 10.157.61.196 with SMTP id l62mr189560otc.17.1506956204646;
 Mon, 02 Oct 2017 07:56:44 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!border1.nntp.ams1.giganews.com!nntp.giganews.com!peer03.ams1!peer.ams1.xlned.com!news.xlned.com!peer03.fr7!futter-mich.highwinds-media.com!peer02.iad!feed-me.highwinds-media.com!news.highwinds-media.com!v62no2689202itd.0!news-out.google.com!p6ni3720itp.0!nntp.google.com!v62no2689201itd.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Mon, 2 Oct 2017 07:56:44 -0700 (PDT)
In-Reply-To: <oqtgfc$iks$1@dont-email.me>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=85.167.212.61;
 posting-account=bPTmZAoAAAC_6HP9XLKB9aAAxBa6BuOR
NNTP-Posting-Host: 85.167.212.61
References: <oludae$seh$1@franka.jacob-sparre.dk>
 <325cf1db-bd9e-4f58-a07b-f297960df269@googlegroups.com>
 <oqtgfc$iks$1@dont-email.me>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <de4405c1-ae2b-4396-a72c-3348593c3777@googlegroups.com>
Subject: Re: Community Input for the Maintenance and Revision of the Ada
 Programming Language
From: reinert <reinkor@gmail.com>
Injection-Date: Mon, 02 Oct 2017 14:56:44 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Body-CRC: 154094314
X-Received-Bytes: 2000
Xref: news.eternal-september.org comp.lang.ada:48274
Date: 2017-10-02T07:56:44-07:00
List-Id: <comp.lang.ada>

On Monday, October 2, 2017 at 3:54:54 PM UTC+2, Jeffrey R. Carter wrote:
> On 10/02/2017 12:06 PM, reinert wrote:
> >   t1,t2 : time;
> > begin
> >   t1 := Clock + 10.0;
> >   t2 := Clock + 20.0;
> > 
> > --  if t1 < Clock and Clock < t2 then -- this function
> >      if Clock in t1 .. t2 then         -- this dows *not* function
> 
> What do you mean by "function"?

Sorry. I did mean "works" ("it functions = it works" ?)

English is only my third language :-)

Try the test program, or read the code, and you may understand my question :-)

reinert

> 
> -- 
> Jeff Carter
> "He that hath no beard is less than a man."
> Much Ado About Nothing
> 132