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