Re: Delay

["Jeffrey D. Cherry" <yrrehcdj@hcetu.ten>]

David Rasmussen <pinkfloydhomer@yahoo.com> wrote in news:3D2C3CE1.1080501
@yahoo.com:

> How do I make a delay in an Ada program?
> 
> /David
> 

Use the 'delay' statement.  Refer to section 9.6 of the Ada Reference 
Manual.

From section 9.6 of the Ada RM:

"A delay_statement is used to block further execution until a specified 
expiration time is reached. The expiration time can be specified either as a 
particular point in time (in a delay_until_statement), or in seconds from 
the current time (in a delay_relative_statement)."

Examples from that same section:

"Example of a relative delay statement:

   delay 3.0;  -- delay 3.0 seconds

Example of a periodic task:

   declare
      use Ada.Calendar;
      Next_Time : Time := Clock + Period;
                         -- Period is a global constant of type Duration
   begin
      loop               -- repeated every Period seconds
         delay until Next_Time;
         ... -- perform some actions
         Next_Time := Next_Time + Period;
      end loop;
   end;"

Note that the data type of the delay expression (the value appearing after 
the reserved word 'delay') differs in the two forms of the delay statement.  
The relative delay accepts a delay expression of type duration (a standard 
data type) while the delay until accepts a value of some "time" type.  The 
example above shows that the delay until uses the data type "Time" defined 
in the standard package Ada.Calendar.

Hope that helps!


-- 
Regards,
Jeffrey D. Cherry
Senior IV&V Analyst
Northrop Grumman Information Technology