diff --git a/kernel/mm_adr_direct.pas b/kernel/mm_adr_direct.pas
index 89b35a5d..0070f930 100644
--- a/kernel/mm_adr_direct.pas
+++ b/kernel/mm_adr_direct.pas
@@ -67,7 +67,7 @@ type
 
    const
     Flo=0;
-    Fhi=$1FFFFFFFF;
+    Fhi=$17FFFFFFF;
     FMaxSize=(Fhi-Flo+1);
 
    var
diff --git a/kernel/ps4_map_mm.pas b/kernel/ps4_map_mm.pas
index 589d7f84..eb4ab7a0 100644
--- a/kernel/ps4_map_mm.pas
+++ b/kernel/ps4_map_mm.pas
@@ -53,8 +53,7 @@ var
  NamedManager  :TNamedManager;
 
 Const
- //SCE_KERNEL_MAIN_DMEM_SIZE=$180000000; //6GB
- SCE_KERNEL_MAIN_DMEM_SIZE=$200000000; //8GB
+ SCE_KERNEL_MAIN_DMEM_SIZE=$180000000; //6GB
 
 type
  pSceKernelDirectMemoryQueryInfo=^SceKernelDirectMemoryQueryInfo;
@@ -558,8 +557,6 @@ var
 begin
  Result:=EINVAL;
 
- Writeln('srchd:',HexStr(searchStart,10),'..',HexStr(searchEnd,10),' align:',HexStr(alignment,10));
-
  if (searchEnd<=searchStart) then Exit;
 
  if (searchEnd>SCE_KERNEL_MAIN_DMEM_SIZE) then Exit;