Uses a private with instead of a standard with for Ada.Strings.Unbounded