CVS difference for arm/progs/arm_html.adb

Differences between 1.17 and version 1.18
Log of other versions for file arm/progs/arm_html.adb

--- arm/progs/arm_html.adb	2005/01/28 04:41:54	1.17
+++ arm/progs/arm_html.adb	2005/02/02 00:28:08	1.18
@@ -112,6 +112,7 @@
     -- 11/15/04 - RLB - Added Indented_Nested_Bulleted.
     -- 12/15/04 - RLB - Added wider columns.
     --  1/24/05 - RLB - Added Inner_Indented.
+    --  2/ 1/05 - RLB - Added Turkish chars to allow an AARM note.
 
     LINE_LENGTH : constant := 78;
 	-- Maximum intended line length.
@@ -3660,6 +3661,22 @@
 		    Output_Object.Disp_Char_Count := Output_Object.Disp_Char_Count + 1;
 		else
 	            Output_Text (Output_Object, """");
+		    Output_Object.Disp_Char_Count := Output_Object.Disp_Char_Count + 1;
+		end if;
+	    when ARM_Output.Small_Dotless_I =>
+		if HTML_Kind > HTML_3 then --and Use_Unicode then -- We'll use it if it might be supported.
+	            Output_Text (Output_Object, "ı");
+		    Output_Object.Disp_Char_Count := Output_Object.Disp_Char_Count + 1;
+		else
+	            Output_Text (Output_Object, "i");
+		    Output_Object.Disp_Char_Count := Output_Object.Disp_Char_Count + 1;
+		end if;
+	    when ARM_Output.Capital_Dotted_I =>
+		if HTML_Kind > HTML_3 then --and Use_Unicode then -- We'll use it if it might be supported.
+	            Output_Text (Output_Object, "İ");
+		    Output_Object.Disp_Char_Count := Output_Object.Disp_Char_Count + 1;
+		else
+	            Output_Text (Output_Object, "I");
 		    Output_Object.Disp_Char_Count := Output_Object.Disp_Char_Count + 1;
 		end if;
 	end case;

Questions? Ask the ACAA Technical Agent