Re: ADA and return functions (Strings)

["David C. Hoos, Sr." <david.c.hoos.sr@ada95.com>]

----- Original Message ----- 
From: "ProLogic" <ProLogic@prologitech.ods.org>
Newsgroups: comp.lang.ada
To: <comp.lang.ada@ada.eu.org>
Sent: May 19, 2002 2:20 AM
Subject: ADA and return functions (Strings)


> Why does ADA return extra spaces in for example the following function...
> 
>  function getVersion return String is
>   begin
>    return Version.Major'img & "." & Version.Minor'img;
>   end;
Well, ADA doesn't return anyting, but the Ada function you've supplied
above will return a string with spaces because the Image attributes of
non-negative numeric objects is defined with a leading space where the
'-' would be if the object had a negative value.  This is true even for
types that are declared not to have negative values.

The best way to do this without spaces is something like this:

return Ada.Strings.Fixed.Trim (Version.Major'img, Ada.Strings.Left) &
 "." & Ada.Strings.Fixed.Trim (Version.Minor'img, Ada.Strings.Left);