[Ada] Indexing error when calling GNAT.Regpat.Match