The node you are looking for is at
gnat_rm/implementation_defined_pragmas pragma-test-case
.