Browse Source

* fix long term problem resulting in crashes of FV apps under OS/2

git-svn-id: trunk@15128 -
Tomas Hajny 15 years ago
parent
commit
d05b8dbbda
1 changed files with 1 additions and 0 deletions
  1. 1 0
      rtl/os2/video.pp

+ 1 - 0
rtl/os2/video.pp

@@ -394,6 +394,7 @@ begin
       shl ecx, 1
       shl ecx, 1
       mov CLen, ecx
+      cld
 @no_update:
       pop edi
       pop esi