From: Eric Botcazou <ebotcazou@adacore.com>
Date: Mon, 20 Oct 2025 22:21:37 +0000 (+0200)
Subject: Ada: Add missing qualifier for integer literal
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ce5cff6bfe9abc1883c80f6db7e82456639f0e05;p=thirdparty%2Fgcc.git

Ada: Add missing qualifier for integer literal

gcc/ada/
	PR ada/102078
	* affinity.c (__gnat_set_affinity_mask): Add U qualifier.
---

diff --git a/gcc/ada/affinity.c b/gcc/ada/affinity.c
index 58f491fa9e8..5b95d704ce0 100644
--- a/gcc/ada/affinity.c
+++ b/gcc/ada/affinity.c
@@ -56,7 +56,7 @@ __gnat_set_affinity_mask (TASK_ID tid, unsigned mask)
   CPUSET_ZERO(cpuset);
 
   for (index = 0; index < sizeof (unsigned) * 8; index++)
-    if (mask & (1 << index))
+    if (mask & (1U << index))
       CPUSET_SET(cpuset, index);
 
   return taskCpuAffinitySet (tid, cpuset);