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

* also fix compilation of macutils unit after macutils.inc had been changed

Browse Source 
git-svn-id: trunk@36882 -
This commit is contained in:
svenbarth 2017-08-12 13:40:41 +00:00
parent 8830ee0a3b
commit aacea142de
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/macos/macutils.pp
View File

@ -53,7 +53,7 @@ function IsDirectory (var spec: FSSpec): Boolean;
function PathArgToFSSpec(s: string; var spec: FSSpec): Integer; function PathArgToFSSpec(s: string; var spec: FSSpec): Integer;
function PathArgToFullPath(s: string; var fullpath: AnsiString): Integer; function PathArgToFullPath(s: string; var fullpath: RawByteString): Integer;
{Gives the volume name (with appended colon) for a given volume reference number.} {Gives the volume name (with appended colon) for a given volume reference number.}
function GetVolumeName(vRefNum: Integer; var volName: String): OSErr; function GetVolumeName(vRefNum: Integer; var volName: String): OSErr;