The node you are looking for is at gnat_rm/implementation_defined_pragmas pragma-favor-top-level.