The node you are looking for is at gnat_rm/implementation_defined_pragmas pragma-type-invariant-class.