Fixed bug.
git-svn-id: https://spexeah.com:8443/svn/Asuro@87 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -374,7 +374,6 @@ begin
|
||||
end;
|
||||
Console_Cursor.X:= 0;
|
||||
console._update_cursor;
|
||||
if Debug then psleep(1000);
|
||||
end;
|
||||
|
||||
procedure _newline(); [public, alias: '_console_newline'];
|
||||
|
||||
@@ -31,6 +31,7 @@ var
|
||||
i : integer;
|
||||
|
||||
begin
|
||||
CLI;
|
||||
for i:=0 to MAX_HOOKS-1 do begin
|
||||
if uint32(Hooks[i]) <> 0 then begin
|
||||
Hooks[i](nil);
|
||||
|
||||
@@ -29,14 +29,14 @@ var
|
||||
procedure Main(); interrupt;
|
||||
var
|
||||
i : integer;
|
||||
b : void;
|
||||
b : dword;
|
||||
|
||||
begin
|
||||
b:= void(inb($60));
|
||||
console.writehexln(uint8(b));
|
||||
b:= inb($60);
|
||||
console.writehexln(b);
|
||||
for i:=0 to MAX_HOOKS-1 do begin
|
||||
if uint32(Hooks[i]) <> 0 then begin
|
||||
Hooks[i](b);
|
||||
Hooks[i](void(b));
|
||||
end;
|
||||
end;
|
||||
outb($20, $20);
|
||||
|
||||
@@ -47,7 +47,6 @@ begin
|
||||
|
||||
STI;
|
||||
isr32.hook(uint32(@bios_data_area.tick_update));
|
||||
console.debug:= true;
|
||||
|
||||
asm
|
||||
MOV dds, CS
|
||||
@@ -75,9 +74,7 @@ begin
|
||||
console.writestring('Total Memory = ');
|
||||
console.writeint(((mbinfo^.mem_upper + 1000) div 1024) + 1);
|
||||
console.writestringln('MB');
|
||||
while(true)do begin end;
|
||||
console.setdefaultattribute(console.combinecolors(lYellow, Black));
|
||||
|
||||
util.halt_and_dont_catch_fire;
|
||||
end;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user