summaryrefslogtreecommitdiff
path: root/packages/graph
diff options
context:
space:
mode:
authormarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-07-12 08:43:22 +0000
committermarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-07-12 08:43:22 +0000
commiteeaa790a14dccdbc33f9e1c751ec25b964f17f6e (patch)
tree6792651a0dad764a49e13223c94f37454dc1421f /packages/graph
parent9aed5fdfcafd5f309dbf4b87498797535ffe5a5e (diff)
downloadfpc-eeaa790a14dccdbc33f9e1c751ec25b964f17f6e.tar.gz
* YOffset-pageswitch moved later into directputpix procedure, since an
intermediate read might otherwise fail (yoffset is a global) mantis #16911 git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@15556 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/graph')
-rw-r--r--packages/graph/src/go32v2/vesa.inc2
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/graph/src/go32v2/vesa.inc b/packages/graph/src/go32v2/vesa.inc
index 41b65d5f1a..0d93c6eeb7 100644
--- a/packages/graph/src/go32v2/vesa.inc
+++ b/packages/graph/src/go32v2/vesa.inc
@@ -1540,7 +1540,6 @@ end;
dummy : byte;
Color : word;
begin
- y:= Y + YOffset;
case CurrentWriteMode of
XORPut:
begin
@@ -1567,6 +1566,7 @@ end;
else
Color := CurrentColor;
end;
+ Y := Y + YOffset;
offs := longint(y) * BytesPerLine + (x div 8);
SetWriteBank(smallint(offs shr 16));
PortW[$3ce] := $0f01; { Index 01 : Enable ops on all 4 planes }