From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on
	ip-172-31-65-14.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-3.2 required=3.0 tests=BAYES_00,NICE_REPLY_A,
	T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6
Path: eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Newsgroups: comp.lang.ada
Subject: Re: problemn with string'last
Date: Fri, 5 May 2023 12:02:02 +0200
Organization: A noiseless patient Spider
Message-ID: <u32k6q$28c34$1@dont-email.me>
References: <2bc1705c-7802-4e89-960f-9b566d376f3cn@googlegroups.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Date: Fri, 5 May 2023 10:02:02 -0000 (UTC)
Injection-Info: dont-email.me; posting-host="a821bf7691719301ca9d9a37230ed4e3";
	logging-data="2371684"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX184bMEJLNjQEt4HIN0PiKcHCR7Z2QF21Qc="
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:102.0) Gecko/20100101
 Thunderbird/102.10.1
Cancel-Lock: sha1:ntXT9LR4Qkm647z4W7h8VGRJFzk=
In-Reply-To: <2bc1705c-7802-4e89-960f-9b566d376f3cn@googlegroups.com>
Content-Language: en-US
Xref: news.eternal-september.org comp.lang.ada:65172
List-Id: <comp.lang.ada>

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