paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-06 07:30:53 +01:00
Code Issues Packages Projects Releases Wiki Activity

* avoid a problem with ChDir('c:') on pure DOS

Browse Source
This commit is contained in:
pierre 1999-11-25 16:24:56 +00:00
parent 6f2f60d8ee
commit 846dee6d78
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/go32v2/system.pp
View File

@ -1157,6 +1157,10 @@ begin
Inoutres:=15;
exit;
end;
{ DosDir($3b,'c:') give Path not found error on
pure DOS PM }
if length(s)=2 then
exit;
end;
{ do the normal dos chdir }
DosDir($3b,s);
@ -1285,7 +1289,10 @@ Begin
End.
{
$Log$
Revision 1.22 1999-11-06 14:38:24 peter
Revision 1.23 1999-11-25 16:24:56 pierre
* avoid a problem with ChDir('c:') on pure DOS
Revision 1.22 1999/11/06 14:38:24 peter
* truncated log
Revision 1.21 1999/10/31 09:34:48 jonas