Преглед изворни кода

* Patch from Ondrej Pokorny to fix broken compilation after 32275

git-svn-id: trunk@32278 -
michael пре 9 година
родитељ
комит
aa7058e82d
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      rtl/win/sysutils.pp

+ 2 - 2
rtl/win/sysutils.pp

@@ -1253,9 +1253,9 @@ function DoCompareStringW(P1, P2: PWideChar; L1, L2: PtrUInt; Flags: DWORD): Ptr
 
 const
   WinAPICompareFlags : array [TCompareOption] of LongWord 
-    = (LINGUISTIC_IGNORECASE,  LINGUISTIC_IGNOREDIACRITIC, NORM_IGNORECASE, 
+    = ({LINGUISTIC_IGNORECASE,  LINGUISTIC_IGNOREDIACRITIC, }NORM_IGNORECASE{, 
        NORM_IGNOREKANATYPE, NORM_IGNORENONSPACE, NORM_IGNORESYMBOLS, NORM_IGNOREWIDTH,
-       NORM_LINGUISTIC_CASING, SORT_DIGITSASNUMBERS, SORT_STRINGSORT);
+       NORM_LINGUISTIC_CASING, SORT_DIGITSASNUMBERS, SORT_STRINGSORT});
        
 function Win32CompareWideString(const s1, s2 : WideString; Options : TCompareOptions) : PtrInt;