From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Subject: Re: problemn with string'last
Date: Fri, 5 May 2023 12:02:02 +0200 [thread overview]
Message-ID: <u32k6q$28c34$1@dont-email.me> (raw)
In-Reply-To: <2bc1705c-7802-4e89-960f-9b566d376f3cn@googlegroups.com>
On 2023-05-05 11:51, Daniel Gaudry wrote:
> here is a code that i simplified
>
> with Ada.Text_Io;
> procedure Help
> is
> Double_Quote : constant String(1 .. 1) := (others => '"' );
> Data : constant String := " PLUS_STRING : CONSTANT STRING(1..3) :=(1 =>'" & Double_Quote & "' , 2 =>'+' , 3 =>'" & Double_Quote & ");";
> begin
>
> Ada.Text_Io.Put_Line(" 05 10 15 20 25 30 35 40 45 50 55 65 70 75 80 85 90");
> Ada.Text_Io.Put_Line(" ....|....!....|....!....|....!....|....!....|....!....|....!....|....!....|....!....|....!");
> Ada.Text_Io.Put_Line("»" & Data & "« " & Data'Last'Img);
>
> end Help;
>
> but the data'last seems not to match the string size
It matches. You missed the "60" tick in your scale. (:-))
--
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de
next prev parent reply other threads:[~2023-05-05 10:02 UTC|newest]
Thread overview: 10+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-05-05 9:51 problemn with string'last Daniel Gaudry
2023-05-05 10:02 ` Dmitry A. Kazakov [this message]
2023-05-05 11:17 ` Jeffrey R.Carter
2023-05-05 12:08 ` Dmitry A. Kazakov
2023-05-05 16:28 ` Manuel Gomez
2023-05-05 16:33 ` Simon Wright
2023-05-05 18:18 ` Manuel Gomez
2023-05-05 19:52 ` J-P. Rosen
2023-05-05 20:44 ` Simon Wright
2023-05-05 23:27 ` Jeffrey R.Carter
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox