Quellcode durchsuchen

* Patch from Ondrej Pokorny to fix broken compilation after 32275

git-svn-id: trunk@32278 -
michael vor 10 Jahren
Ursprung
Commit
aa7058e82d
1 geänderte Dateien mit 2 neuen und 2 gelöschten Zeilen
  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;