Browse Source

* wince memory manager is fixed and enabled by default.

git-svn-id: trunk@4532 -
yury 19 years ago
parent
commit
747bd411f3
1 changed files with 2 additions and 6 deletions
  1. 2 6
      rtl/wince/system.pp

+ 2 - 6
rtl/wince/system.pp

@@ -24,7 +24,7 @@ interface
 {$define WINCE_EXCEPTION_HANDLING}
 {$define DISABLE_NO_THREAD_MANAGER}
 {$define HAS_CMDLINE}
-//{$define HAS_MT_MEMORYMANAGER}  //uncomment line to switch from fpcmm to wincemm
+{$define HAS_MT_MEMORYMANAGER}  // comment this line to switch from wincemm to fpcmm
 
 { include system-independent routine headers }
 {$I systemh.inc}
@@ -1610,11 +1610,7 @@ begin
     runerror(204)
   else
     if (size > 0) and (p <> nil) then
-      begin
-        if (size <> _msize(p)) then
-          runerror(204);
-        Result:=SysFreeMem(P);
-      end;
+      Result:=SysFreeMem(P);
 end;
 
 Function SysAllocMem(Size : ptrint) : Pointer;