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