[Ada] AI12-0309 Missing checks for pragma Suppress