libadalang_tools_24.0.0_d864b5a8/testsuite/tests/pp/S329-035/p.ads

with system.multiprocessors.dispatching_domains;
package p is
task T is
entry set (core_affinity : in natural; success : out boolean);
end;
end;