Инструкции задержки выполнения (delay statements)
При внимательном рассмотрении исходного текста последнего примера можно обнаружить, что после инструкции вывода сообщения приветствия располагается инструкция "delay 0.1;", с помощью которой в данном случае осуществляется задержка выполнения задачи на 0.1 секунды.
Инструкции задержки выполнения могут быть использованы для приостановки выполнения тела задачи (или программы) на некоторое время.
Рзличают два вида инструкций задержки выполнения: относительная задержка выполнения и абсолютная задержка выполнения.
Общий вид инструкции относительной задержки выполнения следующий:
| delay время_задержки; |
Здесь результат выражения время_задержки, имеющего предопределенный вещественный тип с фиксированной точкой Duration (описан в пакете Standard), указывает длительность задержки выполнения в секундах, на которую необходимо задержать выполнения задачи (или программы).
При этом отсчет времени задержки выполняется относительно текущего момента времени.
Наглядным примером использования инструкции относительной задержки, для задержки выполнения задачи на одну секунду, может служить следующее:
| delay 1.0; |
Общий вид инструкции абсолютной задержки выполнения следующий:
| delay until время_задержки; |
В этом случае результат выражения время_задержки, любого неограниченного типа, указывает момент времени, до наступления которого необходимо задержать выполнение задачи (или программы).
Следующий пример демонстрирует использование инструкции абсолютной задержки выполнения задачи:
| delay until Time_Of(2010, 1, 1, 0.0); -- задержка выполнения до 1 января 2010 года |
Следует также заметить, что описание предопределенного типа времени Time
и ассоциируемых с ним операций предусматривается в стандартном пакете Ada.Calendar.
Кроме того, пакет Ada.Calendar предоставляет функцию Clock, которая возвращает значение текущего момента времени (для получения более полной информации следует обратиться к спецификации этого пакета).
Отметим также, что при построении систем, которые должны работать в реальном масштабе времени, вместо типа времени Time, описанного в стандартном пакете Ada.Calendar, следует использовать тип времени Time, который описывается в пакете Ada.Real_Time
(для получения более полной информации следует обратиться к спецификации пакета Ada.Real_Time).
