Virtual events in Ada

Virtual events in Ada