Browse Source

- removed the unnecessary for the pascal calling convention register save/restores in DirectPutPixelX

git-svn-id: trunk@41049 -
nickysn 6 years ago
parent
commit
4dfee9efc9
1 changed files with 0 additions and 12 deletions
  1. 0 12
      packages/graph/src/msdos/graph.pp

+ 0 - 12
packages/graph/src/msdos/graph.pp

@@ -2695,12 +2695,6 @@ const CrtAddress: word = 0;
  Procedure DirectPutPixelX(X,Y: smallint); assembler;
  { note: still needs or/and/notput support !!!!! (JM) }
  asm
-   push ax
-   push bx
-   push cx
-   push dx
-   push es
-   push di
 {$IFDEF REGCALL}
    mov cl, al
    mov di, dx
@@ -2734,12 +2728,6 @@ const CrtAddress: word = 0;
    xor al,ah             { xor it and return value into AL }
  @MovMode:
    mov es:[di], al
-   pop di
-   pop es
-   pop dx
-   pop cx
-   pop bx
-   pop ax
  end;
 {$endif asmgraph}