The node you are looking for is at
gnat_rm/the_gnat_library gnat-task-lock-g-tasloc-ads
.