From 8a96bb656fc1656bab6475ab0f003da0c60e8bd2 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Mon, 28 Jan 2019 17:32:14 +0000
Subject: [PATCH] * declare all registers as clobbered by int 10h in the asm
 block in SetVisual200_350 and leave it to fpc to preserve what is necessary

git-svn-id: trunk@41103 -
---
 packages/graph/src/go32v2/graph.pp | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

diff --git a/packages/graph/src/go32v2/graph.pp b/packages/graph/src/go32v2/graph.pp
index 68292e604d..0b0a8852f2 100644
--- a/packages/graph/src/go32v2/graph.pp
+++ b/packages/graph/src/go32v2/graph.pp
@@ -2237,16 +2237,8 @@ End;
     asm
       mov ax,[page]    { only lower byte is supported. }
       mov ah,05h
-      push ebp
-      push esi
-      push edi
-      push ebx
       int 10h
-      pop ebx
-      pop edi
-      pop esi
-      pop ebp
-    end ['EDX','EAX'];
+    end ['EAX','EBX','ECX','EDX','ESI','EDI','EBP'];
   end;
 
  procedure SetActive200(page: word);