* Added HAS_WIDESTRINGMANAGER define to turn off default wide string manager routines.

git-svn-id: trunk@5308 -

rtl/inc/wstrings.inc

@@ -1515,10 +1515,12 @@ function CharLengthPChar(const Str: PChar): PtrInt;
 procedure initwidestringmanager;
   begin
     fillchar(widestringmanager,sizeof(widestringmanager),0);
+{$ifndef HAS_WIDESTRINGMANAGER}
     widestringmanager.Wide2AnsiMoveProc:=@defaultWide2AnsiMove;
     widestringmanager.Ansi2WideMoveProc:=@defaultAnsi2WideMove;
     widestringmanager.UpperWideStringProc:=@GenericWideCase;
     widestringmanager.LowerWideStringProc:=@GenericWideCase;
+{$endif HAS_WIDESTRINGMANAGER}
     widestringmanager.CompareWideStringProc:=@CompareWideString;
     widestringmanager.CompareTextWideStringProc:=@CompareTextWideString;
     widestringmanager.CharLengthPCharProc:=@CharLengthPChar;

rtl/wince/system.pp

@@ -25,6 +25,7 @@ interface
 {$define DISABLE_NO_THREAD_MANAGER}
 {$define HAS_CMDLINE}
 {$define HAS_MT_MEMORYMANAGER}  // comment this line to switch from wincemm to fpcmm
+{$define HAS_WIDESTRINGMANAGER}
 
 { include system-independent routine headers }
 {$I systemh.inc}