Browse Source

* use stosb instead of mov in PutPixelX

git-svn-id: trunk@41045 -
nickysn 6 years ago
parent
commit
6ad69d0ab9
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/graph/src/msdos/graph.pp

+ 1 - 1
packages/graph/src/msdos/graph.pp

@@ -2655,7 +2655,7 @@ const CrtAddress: word = 0;
     out dx, ax
     (* End selection of plane *)
     mov al, byte ptr [Color]  ; { only lower byte is used. }
-    mov es:[di], al
+    stosb
 @@Done:
   end;
 {$endif asmgraph}