IT WERKS

git-svn-id: https://spexeah.com:8443/svn/Asuro@155 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

src/pmemorymanager.pas

@@ -36,8 +36,6 @@ var
 begin
     FirstBlock:= base SHR 22;
     LastBlock:= (base+length) SHR 22;
-    console.writewordln(FirstBlock);
-    console.writewordln(LastBlock);
     if (FirstBlock > 1023) then exit;
     while LastBlock > 1023 do begin
         LastBlock:= LastBlock-1;

src/vmemorymanager.pas

@@ -73,7 +73,6 @@ begin
     map_page:= false;
     PageDirectory^[page_number].Present:= true;
     addr:= block;
-    writehexln(block);
     PageDirectory^[page_number].Address:= addr SHL 10;
     PageDirectory^[page_number].PageSize:= true;
     PageDirectory^[page_number].Writable:= true;