mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-13 10:49:17 +02:00
- removed the unnecessary code from SetVisual200 (the start address that is being read isn't written anywhere and is not used)
git-svn-id: trunk@41101 -
This commit is contained in:
parent
b70aeac0d4
commit
1cd93cf9a7
@ -2247,18 +2247,6 @@ End;
|
||||
pop edi
|
||||
pop esi
|
||||
pop ebp
|
||||
|
||||
{ read start address }
|
||||
mov dx,3d4h
|
||||
mov al,0ch
|
||||
out dx,al
|
||||
inc dx
|
||||
in al,dx
|
||||
mov ah,al
|
||||
dec dx
|
||||
mov al,0dh
|
||||
out dx,al
|
||||
in al,dx
|
||||
end ['EDX','EAX'];
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user