Browse Source

* Fsearch bug fixed

daniel 27 years ago
parent
commit
88b7d1ab9d
1 changed files with 12 additions and 1 deletions
  1. 12 1
      rtl/os2/dos.pas

+ 12 - 1
rtl/os2/dos.pas

@@ -619,7 +619,11 @@ begin
             leave
             leave
             ret
             ret
          .LDISKFREE1:
          .LDISKFREE1:
+{$ifdef NOATTCDQ}
+            cltd
+{$else}
             cwde
             cwde
+{$endif}
             leave
             leave
             ret
             ret
         end
         end
@@ -657,7 +661,11 @@ begin
             leave
             leave
             ret
             ret
         .LDISKSIZE1:
         .LDISKSIZE1:
+{$ifdef NOATTCDQ}
+            cltd
+{$else}
             cwde
             cwde
+{$endif}
             leave
             leave
             ret
             ret
         end
         end
@@ -980,7 +988,10 @@ end;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.9  1998-12-07 18:55:41  jonas
+  Revision 1.10  1998-12-10 16:05:39  daniel
+  * Fsearch bug fixed
+
+  Revision 1.9  1998/12/07 18:55:41  jonas
     * fixed bug reported in the mailing list by Frank McCormick (fsearch: changed
     * fixed bug reported in the mailing list by Frank McCormick (fsearch: changed
       "if p1 = 0" to "if p1 <> 0"
       "if p1 = 0" to "if p1 <> 0"