paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-04 07:43:04 +01:00
Code Issues Packages Projects Releases Wiki Activity

Amiga: fixed copyright header and merged a fix from MorphOS in sysdir

Browse Source 
git-svn-id: trunk@27058 -
This commit is contained in:
Károly Balogh 2014-03-09 17:57:07 +00:00
parent 2f02fa6f16
commit 1483a631d7
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/amiga/sysdir.inc
View File

@ -1,9 +1,8 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Florian Klaempfl and Pavel Ozerski
member of the Free Pascal development team.
Copyright (c) 2014 by Free Pascal development team
FPC Pascal system unit for Amiga.
Low level directory functions
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
@ -76,6 +75,8 @@ begin
AOS_OrigDir:=tmpLock;
tmpLock:=0;
end;
end else begin
dosError2InOut(ERROR_DIR_NOT_FOUND);
end;
if tmpLock<>0 then Unlock(tmpLock);