瀏覽代碼

* missing getdir -> do_getdir rename for r24993

git-svn-id: branches/cpstrrtl@25046 -
Jonas Maebe 12 年之前
父節點
當前提交
893a9a57c6
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      rtl/msdos/sysdir.inc

+ 2 - 2
rtl/msdos/sysdir.inc

@@ -81,10 +81,10 @@ begin
        exit;
    end;
 { do the normal dos chdir }
-  DosDir($3b,s,len);
+  DosDir($3b,s);
 end;
 
-procedure GetDir (DriveNr: byte; var Dir: RawByteString);
+procedure do_GetDir (DriveNr: byte; var Dir: RawByteString);
 var
   temp : array[0..260] of char;
   i    : longint;