Re: Length of unbounded_string.

[Niklas Holsti <niklas.holsti@tidorum.invalid>]

On 11-10-17 09:39 , ldries46 wrote:
> I have to strings I want to concatenate with a space in between. The
> first (str) ends with a ','.
> The output seems to be a concatenation where the ',' is missing.
> A can see with the debugging facilities that before the concatenation
> there is a ',' and after the concatenation depending on the type of
> facility I use the comma is present (debug\print) or is not
> (debug\display).

And what happens if you simply print it with Ada.Text_IO?

In my experience, gdb sometimes (well, rather often) prints complex Ada 
structures incorrectly or incompletely.

> The last one is consistent with the display of the line in a gtk window.
> For further use I need that comma, but I cannot add it explicitly
> because as can beseen in the code I can reach rhat code also in some
> other cases.

Of course you could divide the code inte more cases, separating the 
comma case from the other cases.

>
> L. Dries
> "Niklas Holsti" schreef in bericht news:9g02plFrnlU1@mid.individual.net...
>
> On 11-10-16 14:52 , ldries46 wrote:
>> Sorry I just thought to simplify the problem but did that the wrong way
>> my real problem is in the following code:
>>
>> ch := Element(str, len);
>> if ch = ',' or (ch /= ';' and ch /= '{' and ch /= '}') then
>> nr := nr + 1;
>> str := str & " " & Next_Line;

That code is incomplete. Where is the "end if"?

If you want more help, please try to make a small, self-contained 
example in which the problem occurs, and show the whole code.

>>
>> where in the first line
>> print str.reference.data
>> $24 = "static void gtk_print_job_set_property (GObject *object", ','

Why is gdb speaking of GObject? I tought "str" was mean to be 
Ada.Strings.Unbounded.Unbounded_String, not some Gtk type.


-- 
Niklas Holsti
Tidorum Ltd
niklas holsti tidorum fi
       .      @       .