CVS difference for arm/progs/arm_corr.adb

Differences between 1.5 and version 1.6
Log of other versions for file arm/progs/arm_corr.adb

--- arm/progs/arm_corr.adb	2006/02/11 07:59:39	1.5
+++ arm/progs/arm_corr.adb	2006/09/23 05:23:33	1.6
@@ -2,7 +2,8 @@
      ARM_Contents,
      Ada.Text_IO,
      Ada.Exceptions,
-     Ada.Strings.Fixed;
+     Ada.Strings.Fixed,
+     Ada.Strings.Maps;
 package body ARM_Corr is
 
     --
@@ -52,6 +53,7 @@
     --  2/10/06 - RLB - Added even more additional parameters to the
     --			table command.
     --		- RLB - Added picture command.
+    --  9/22/06 - RLB - Added missing with.
 
     LINE_LENGTH : constant := 78;
 	-- Maximum intended line length.
@@ -745,7 +747,8 @@
 		    Ada.Text_IO.Put_Line (Output_Object.Output_File,
 				       Header_Text);
 	        end if;
-	    when ARM_Contents.Clause | ARM_Contents.Subclause =>
+	    when ARM_Contents.Clause | ARM_Contents.Subclause |
+		 ARM_Contents.Subsubclause =>
 	        Ada.Text_IO.Put_Line (Output_Object.Output_File,
 				      Clause_Number & ' ' & Header_Text);
 	end case;
@@ -828,7 +831,8 @@
 		    Ada.Text_IO.Put_Line (Output_Object.Output_File,
 				       Header_Text);
 	        end if;
-	    when ARM_Contents.Clause | ARM_Contents.Subclause =>
+	    when ARM_Contents.Clause | ARM_Contents.Subclause |
+		 ARM_Contents.Subsubclause =>
 	        Ada.Text_IO.Put_Line (Output_Object.Output_File,
 				      Clause_Number & ' ' & Header_Text);
 	end case;

Questions? Ask the ACAA Technical Agent