comp.lang.ada
 help / color / mirror / Atom feed
From: Wes Groleau <wwgrol@ftw.rsc.raytheon.com>
Subject: Re: Natural to String without space? (newbie question)
Date: Tue, 29 May 2001 16:04:13 -0500
Date: 2001-05-29T16:04:13-05:00	[thread overview]
Message-ID: <3B140ECD.A486A578@ftw.rsc.raytheon.com> (raw)
In-Reply-To: u4rub8der.fsf@wanadoo.fr


> function Image (N : in Natural) return String is
>    N_Image : constant String := Natural'Image (N);
> begin
>    return N_Image (2 .. N_Image'Last);
> end Image;


Call me obsessive, but I feel safer with

  function Image (N : in Natural) return String is
     N_Image : constant String := Natural'Image (N);
  begin
     return N_Image (N'Image'First + 1 .. 
                     N_Image'Last           );
  end Image;



-- 
Wes Groleau
http://freepages.rootsweb.com/~wgroleau



  reply	other threads:[~2001-05-29 21:04 UTC|newest]

Thread overview: 14+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2001-05-23 15:17 Natural to String without space? (newbie question) Tomas Hlavaty
2001-05-23 22:37 ` DuckE
2001-05-24  6:33 ` Pascal Obry
2001-05-29 21:04   ` Wes Groleau [this message]
2001-05-29 23:00     ` Jeffrey Carter
2001-05-30  7:19     ` Pascal Obry
  -- strict thread matches above, loose matches on Subject: below --
2001-05-23 22:45 Beard, Frank
2001-05-24  7:56 ` Martin Dowie
2001-05-24 21:55 Beard, Frank
2001-05-25  7:30 ` Martin Dowie
2001-05-25  8:30   ` Tomas Hlavaty
2001-05-25 15:05   ` Ehud Lamm
2001-05-28  7:31     ` Martin Dowie
2001-05-25 21:23   ` Ole-Hjalmar Kristensen
replies disabled

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