소스 검색

* align DosError returned for invalid (unused) handle in GetFTime and SetFTime to TP/BP

git-svn-id: trunk@29529 -
Tomas Hajny 10 년 전
부모
커밋
37acf48426
1개의 변경된 파일7개의 추가작업 그리고 1개의 파일을 삭제
  1. 7 1
      rtl/os2/dos.pas

+ 7 - 1
rtl/os2/dos.pas

@@ -135,6 +135,8 @@ begin
    begin
     Time:=0;
     OSErrorWatch (DosError);
+    if DosError = 87 then
+     DosError := 6; (* Align to TP/BP behaviour *)
    end;
 end;
 
@@ -157,7 +159,11 @@ begin
      OSErrorWatch (RC);
    end
   else
-   OSErrorWatch (RC);
+   begin
+    OSErrorWatch (RC);
+    if RC = 87 then
+     RC := 6;
+   end;
   DosError := integer (RC);
 end;