paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 14:29:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

* missing getdir -> do_getdir rename for r24993

Browse Source 
git-svn-id: branches/cpstrrtl@25046 -
This commit is contained in:
Jonas Maebe 2013-07-04 22:28:27 +00:00
parent ab9036ecbf
commit 893a9a57c6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/msdos/sysdir.inc
View File

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