comp.lang.ada
 help / color / mirror / Atom feed
From: Daniel Gaudry <gaudry.dg@gmail.com>
Subject: problemn with string'last
Date: Fri, 5 May 2023 02:51:53 -0700 (PDT)	[thread overview]
Message-ID: <2bc1705c-7802-4e89-960f-9b566d376f3cn@googlegroups.com> (raw)

hi,
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

Any help is welcome
best regards

             reply	other threads:[~2023-05-05  9:51 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2023-05-05  9:51 Daniel Gaudry [this message]
2023-05-05 10:02 ` problemn with string'last Dmitry A. Kazakov
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