mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 20:19:25 +02:00
* Mode-X fixed (regcall-related bugfix in the asm of SetVisualX)
git-svn-id: trunk@15872 -
This commit is contained in:
parent
6cc641c7bb
commit
9a4238dea9
@ -1498,7 +1498,7 @@ const CrtAddress: word = 0;
|
||||
push cx
|
||||
push dx
|
||||
{$IFDEF REGCALL}
|
||||
mov cx, ax
|
||||
mov cx, dx
|
||||
{$ENDIF REGCALL}
|
||||
{ Wait if we are currently in a Vertical Retrace }
|
||||
MOV DX, INPUT_1 { Input Status #1 Register }
|
||||
|
Loading…
Reference in New Issue
Block a user