The node you are looking for is at gnat_rm/implementation_advice rm-2-8-17-19-pragmas.