Improve Ada.Strings.Generic_Unbounded.Set_Length and Unbounded_Slice