- U1 : User_Data_Access := new User_Data'("p1");
- U2 : User_Data_Access := new User_Data'("p2");
- U3 : User_Data_Access := new User_Data'("p3");
- U4 : User_Data_Access := new User_Data'("p4");
- U5 : User_Data_Access := new User_Data'("p5");
+ U1 : constant User_Data_Access := new User_Data'("p1");
+ U2 : constant User_Data_Access := new User_Data'("p2");
+ U3 : constant User_Data_Access := new User_Data'("p3");
+ U4 : constant User_Data_Access := new User_Data'("p4");
+ U5 : constant User_Data_Access := new User_Data'("p5");