Newbe compile problems

[James Amendolagine <uq274@freenet.victoria.bc.ca>]

Hello,

   I am just starting with ADA. I am going through the ADA turorial, and
can't get some source code to compile. Here's the source:

 with Float_Text_IO;
 use Float_Text_IO;
 procedure Think is
   A, B : Float := 0.0; -- A and B initially zero; note the period.
   I, J : Integer := 1;
 begin
   A := B + 7.;
   I := J * 3;
   B := Float(I) + A;
   Put(B);
 end Think;

And the error message:

cd /home/jamie/learnAda/think/
gnatmake think.adb 
gcc -c think.adb
think.adb:7:14: real literal cannot end with point
gnatmake: "think.adb" compilation error
Compilation exited abnormally with code 2 at Sun Dec 15 09:34:00

I am using Redhat Linux. With gnat-3.07. --Other examples like "hello
world" compiled OK. Solutions?
Thanks in advance.

    Jamie