Explorar o código

* fixed return of result in the asm version of GetPixel320

git-svn-id: trunk@40966 -
nickysn %!s(int64=6) %!d(string=hai) anos
pai
achega
cab9b4cb6b
Modificáronse 1 ficheiros con 3 adicións e 4 borrados
  1. 3 4
      packages/graph/src/msdos/graph.pp

+ 3 - 4
packages/graph/src/msdos/graph.pp

@@ -2300,11 +2300,10 @@ End;
     shr    ax, 1
     shr    ax, 1
     add    di, ax
-    xor    ax, ax
-    mov    al,es:[di]
-    mov    word ptr @Result,ax
+    mov    al, es:[di]
+    xor    ah, ah
 {$ifdef FPC_GRAPH_SUPPORTS_TRUECOLOR}
-    mov    word ptr @Result+2, 0
+    xor    dx, dx
 {$endif FPC_GRAPH_SUPPORTS_TRUECOLOR}
   end;
 {$endif asmgraph}