comp.lang.ada
 help / color / mirror / Atom feed
From: Niklas Holsti <niklas.holsti@tidorum.invalid>
Subject: Re: Length of unbounded_string.
Date: Sun, 16 Oct 2011 15:00:35 +0200
Date: 2011-10-16T15:00:35+02:00	[thread overview]
Message-ID: <9g02plFrnlU1@mid.individual.net> (raw)
In-Reply-To: <4e9ad365$0$3267$703f8584@news.kpn.nl>

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;

And what *is* your problem with this code? I don't understand the gdb 
mess below, or what your are trying to show with it. Can you explain the 
problem in Ada terms, without digging into the internals of 
Unbounded_String?


>
> where in the first line
> print str.reference.data
> $24 = "static void gtk_print_job_set_property (GObject *object", ','
> <repeats 11 times>,
> "["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]"
>
> len = 56
> ch = ',' in fact the first
> print str.reference.data
> $386 = "static void gtk_print_job_set_property (GObject *object, guint",
> ' ' <repeats 18 times>,
> "prop_id,["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]"
>
> in the display option instead of rhe print option this shows as
> "static void gtk_print_job_set_property (GObject *object guint", ' '
> <repeats 18 times>,
> "prop_id,["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]["0d"]["f0"]["ad"]["ba"]"
>
> and when I save that line later on the comma after object is also
> disapperared
>
> L. Dries


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



  reply	other threads:[~2011-10-16 12:59 UTC|newest]

Thread overview: 33+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-10-16  8:48 Length of unbounded_string ldries46
2011-10-16  9:59 ` Niklas Holsti
2011-10-16 12:06   ` ldries46
2011-10-16 12:52   ` ldries46
2011-10-16 13:00     ` Niklas Holsti [this message]
2011-10-17  7:39       ` ldries46
2011-10-17 19:49         ` Niklas Holsti
2011-10-18 11:47           ` ldries46
2011-10-18 17:54             ` Niklas Holsti
2011-10-19  2:38               ` ldries46
2011-10-19  6:07                 ` Niklas Holsti
2011-10-24 15:10                   ` ldries46
2011-10-19  6:37                 ` Simon Wright
2011-10-19 14:48                 ` Alex Mentis
2011-10-24 17:04                   ` ldries46
2011-10-16 10:14 ` Vinzent Hoefler
  -- strict thread matches above, loose matches on Subject: below --
2011-10-25  9:37 ldries46
2011-10-25 17:57 ` Jeffrey Carter
2011-10-28  2:54   ` ldries46
2011-10-28  4:55     ` Jeffrey Carter
2011-10-25 20:23 ` Vadim Godunko
2011-10-25 21:28   ` Simon Wright
2011-10-26  4:41     ` Simon Wright
2011-10-26 22:47     ` Randy Brukardt
2011-10-27  8:05       ` AdaMagica
2011-10-27  8:56       ` Simon Wright
2011-10-27 11:05         ` Brian Drummond
2011-10-28  3:12           ` ldries46
     [not found]           ` <4eafc489$0$3081$703f8584@textnews.kpn.nl>
2011-11-01 18:22             ` Jeffrey Carter
2011-10-27 11:28         ` Georg Bauhaus
2011-10-27 12:17           ` Dmitry A. Kazakov
2011-10-27 13:31             ` Georg Bauhaus
2011-10-27 14:34               ` Dmitry A. Kazakov
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox