Ada fixes