Re: Invade wikipedia!

[Ivan Levashew <octagram@bluebottle.com>]

Jean-Pierre Rosen wrote:

> Just use Integer_Text_IO, and forget about the stupid space.

xen:~/just_test OCTAGRAM$ nano aitio.adb
xen:~/just_test OCTAGRAM$ ada_mode
xen:~/just_test OCTAGRAM$ gnatmake aitio.adb
gcc -c aitio.adb
gnatbind -aO./ -C -I- -x aitio.ali
gnatlink aitio.ali -C --GCC=/usr/local/ada-build/friendly/gcc
xen:~/just_test OCTAGRAM$ ./aitio
 >>>          8<<<
xen:~/just_test OCTAGRAM$ cat aitio.adb
with Ada.Text_IO;
with Ada.Integer_Text_IO;

use Ada;

procedure AITIO is

begin
    Text_IO.Put (">>>");
    Integer_Text_IO.Put (8);
    Text_IO.Put_Line ("<<<");
end AITIO;
xen:~/just_test OCTAGRAM$


It's broken either! I know how to fix it:

xen:~/just_test OCTAGRAM$ nano aitio.adb
xen:~/just_test OCTAGRAM$ gnatmake aitio.adb
gcc -c aitio.adb
gnatbind -aO./ -C -I- -x aitio.ali
gnatlink aitio.ali -C --GCC=/usr/local/ada-build/friendly/gcc
xen:~/just_test OCTAGRAM$ ./aitio
 >>>8<<<
xen:~/just_test OCTAGRAM$ cat aitio.adb
with Ada.Text_IO;
with Ada.Integer_Text_IO;

use Ada;

procedure AITIO is

begin
    Text_IO.Put (">>>");
    Integer_Text_IO.Put (8, Width => 0);
    Text_IO.Put_Line ("<<<");
end AITIO;
xen:~/just_test OCTAGRAM$

But, once again, it looks stupid.

> Anyway, most of the time, the space is useful,

Integer'Image (-2) = "-2" -- no space here no matter how useful it is

-- 
If you want to get to the top, you have to start at the bottom