Added Ada parser and default file associations (WinMerge#2452) (2)

- sort keywords - add Ada to StringBlacklist.txt
pipeline-foundation · Sep 28, 2024 · 0df0ce8 · 0df0ce8
1 parent f9272c0
commit 0df0ce8
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 9 deletions.
diff --git a/Externals/crystaledit/editlib/parsers/ada.cpp b/Externals/crystaledit/editlib/parsers/ada.cpp
@@ -128,9 +128,9 @@ static const tchar_t * s_apszAdaAttributeList[] =
     _T ("'emax"),
     _T ("'enum_Rep"),
     _T ("'enum_Val"),
+    _T ("'epsilon"),
     _T ("'exponent"),
     _T ("'external_Tag"),
-    _T ("'epsilon"),
     _T ("'first"),
     _T ("'first_Bit"),
     _T ("'floor"),
@@ -223,20 +223,20 @@ static const tchar_t * s_apszAdaAttributeList[] =
 static const tchar_t * s_apszAdaTypeList[] =
   {
     _T ("boolean"),
+    _T ("duration")
+    _T ("float"),
     _T ("integer"),
-    _T ("natural"),
-    _T ("positive"),
-    _T ("short_short_integer"),
-    _T ("short_integer"),
+    _T ("long_float"),
     _T ("long_integer"),
+    _T ("long_long_float"),
     _T ("long_long_integer"),
+    _T ("natural"),
+    _T ("positive"),
     _T ("short_float"),
-    _T ("float"),
-    _T ("long_float"),
-    _T ("long_long_float"),
+    _T ("short_integer"),
+    _T ("short_short_integer"),
     _T ("string"),
     _T ("wide_string"),
-    _T ("duration")
   };
 
 static bool

diff --git a/Translations/WinMerge/StringBlacklist.txt b/Translations/WinMerge/StringBlacklist.txt
@@ -34,6 +34,7 @@ Java
 JavaScript
 JSON
 Lua
+Ada
 AutoLISP
 MATLAB
 NSIS
-Original file line number
+Diff line change
@@ Expand Up / @@ -34,6 +34,7 @@ Java @@
     JavaScript
     JSON
     Lua
+    Ada
     AutoLISP
     MATLAB
     NSIS
@@ Expand Down @@