IT WERKS
git-svn-id: https://spexeah.com:8443/svn/Asuro@155 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
parent
5d9f613f3e
commit
b89f4d2e4c
Binary file not shown.
Binary file not shown.
BIN
lib/libpsystem.a
BIN
lib/libpsystem.a
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -36,8 +36,6 @@ var
|
|||||||
begin
|
begin
|
||||||
FirstBlock:= base SHR 22;
|
FirstBlock:= base SHR 22;
|
||||||
LastBlock:= (base+length) SHR 22;
|
LastBlock:= (base+length) SHR 22;
|
||||||
console.writewordln(FirstBlock);
|
|
||||||
console.writewordln(LastBlock);
|
|
||||||
if (FirstBlock > 1023) then exit;
|
if (FirstBlock > 1023) then exit;
|
||||||
while LastBlock > 1023 do begin
|
while LastBlock > 1023 do begin
|
||||||
LastBlock:= LastBlock-1;
|
LastBlock:= LastBlock-1;
|
||||||
|
@ -73,7 +73,6 @@ begin
|
|||||||
map_page:= false;
|
map_page:= false;
|
||||||
PageDirectory^[page_number].Present:= true;
|
PageDirectory^[page_number].Present:= true;
|
||||||
addr:= block;
|
addr:= block;
|
||||||
writehexln(block);
|
|
||||||
PageDirectory^[page_number].Address:= addr SHL 10;
|
PageDirectory^[page_number].Address:= addr SHL 10;
|
||||||
PageDirectory^[page_number].PageSize:= true;
|
PageDirectory^[page_number].PageSize:= true;
|
||||||
PageDirectory^[page_number].Writable:= true;
|
PageDirectory^[page_number].Writable:= true;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user