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.8 required=5.0 tests=BAYES_00,URI_HEX autolearn=no
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,a0fe76afdfe9e57d
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-06-11 11:46:20 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!news.tu-darmstadt.de!fu-berlin.de!uni-berlin.de!212.97.179.223!not-for-mail
From: Jano <nono@celes.unizar.es>
Newsgroups: comp.lang.ada
Subject: Re: milliseconds and delay until
Date: Wed, 11 Jun 2003 20:46:05 +0200
Message-ID: <MPG.195197589c4fd46e98971a@News.CIS.DFN.DE>
References: <bc7smt$357$04$1@news.t-online.com>
NNTP-Posting-Host: 212.97.179.223
X-Trace: fu-berlin.de 1055357178 16931683 212.97.179.223 (16 [49872])
X-Newsreader: MicroPlanet Gravity v2.50
Xref: archiver1.google.com comp.lang.ada:38999
Date: 2003-06-11T20:46:05+02:00
List-Id: <comp.lang.ada>

Thomas Bruns dice...
> Hello
> 
> how can I handle the until delay statement, too do this: ????
> 
> 
> with ADA.Calendar; use ADA.Calendar;
> 
> procedure ....
> 
> MS : INTEGER; --milliseconds
> 
> begin
> MS:= INTEGER(FLOAT(seconds(clock)) * 1000);
> 
> MS := MS + 100;
> 
> delay until MS; ---???? it is wrong :-( it must be a time type :-( but I
>         -- need the clock from a fixed time and add some milliseconds... 
> --and then the until delay statement....How can I handle this???

Why not use better a Time type from start?

Next : Time := Clock;

Next := Next + 0.1;

delay until Next;

-- 
-------------------------
Jano
402450.at.cepsz.unizar.es
-------------------------