[Ada] Spurious visibility error in predicate in generic instance