* Add rule for mapping "::" to "__"

80decb60 · yoogx · 61a1be84 · 80decb60
Commit 80decb60 authored Sep 15, 2014 by yoogx
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 0 deletions

src/backends/ocarina-backends-utils.adb src/backends/ocarina-backends-utils.adb +6 -0

No files found.
--- a/src/backends/ocarina-backends-utils.adb
+++ b/src/backends/ocarina-backends-utils.adb
@@ -333,6 +333,12 @@ package body Ocarina.Backends.Utils is
                  if Ada_Style then
                     Add_Char_To_Name_Buffer ('_');
                  end if;
+               elsif Initial_Name (Index) = ':' then
+                  Add_Char_To_Name_Buffer ('_');
+                  if Ada_Style then
+                     Add_Char_To_Name_Buffer ('_');
+                  end if;
+
               else
                  Add_Char_To_Name_Buffer (Initial_Name (Index));
               end if;