The node you are looking for is at
gnat_rm/gnat_language_extensions case-pattern-matching
.