[Ada] Refactor pragma argument getters