Re: Integer to String

[Simon Wright <simon@pushface.org>]

montgrimpulo <aghte@hotlinemail.com> writes:

>    num : integer ; char : character ; str : String(1..6);
> begin

>    str:="123456";
>    num:=Integer'Value(str);
>    New_Line(2);Put("num= ");Put(num);
> (20)   str:=Integer'Image(num);

> raised CONSTRAINT_ERROR : itos.adb:20 length check failed.

Integer'Image prefixes the digits of the result with a '-' if the number
is negative and a space if it's positive.

You could just write

   Put (Integer'Image (num));

or

   num := Integer'Value ("123456");
   Put_Line ("str=" & Integer'Image (num));