CVS difference for ai05s/ai05-0008-1.txt

--- ai05s/ai05-0008-1.txt	2008/12/02 06:01:19	1.10
+++ ai05s/ai05-0008-1.txt	2008/12/23 03:19:15	1.11
@@ -231,12 +231,12 @@
  
     with Q, Ada.Text_IO;
     package body P is
-	procedure P2 (Z : in out T) is -- Assume pass-by-reference
-	   C_Ren : Character renames Z.C(2); -- OK, Z is indefinite.
-	begin
-	   Q.X := Q.Y; -- Erroneous.
-           Ada.Text_IO.Put (C_Ren); -- Doesn't exist anymore.
-	end P2;
+       procedure P2 (Z : in out T) is -- Assume pass-by-reference
+          C_Ren : Character renames Z.C(2); -- OK, Z is indefinite.
+       begin
+          Q.X := Q.Y; -- Erroneous.
+          Ada.Text_IO.Put (C_Ren); -- Doesn't exist anymore.
+       end P2;
 	
     begin
        P2 (T(Q.X)); -- OK.