The node you are looking for is at
gnat_rm/implementation_defined_pragmas pragma-common-object
.