Browse Source

Amiga: fixed RawByteString related typos in sysutils

git-svn-id: trunk@27053 -
Károly Balogh 11 years ago
parent
commit
ad1cc67eb2
1 changed files with 2 additions and 2 deletions
  1. 2 2
      rtl/amiga/sysutils.pp

+ 2 - 2
rtl/amiga/sysutils.pp

@@ -63,7 +63,7 @@ uses dos,sysconst;
 
 { * Followings are implemented in the system unit! * }
 function PathConv(path: shortstring): shortstring; external name 'PATHCONV';
-function PathConv(path: RawByteString): shortstring; external name 'PATHCONVRBS';
+function PathConv(path: RawByteString): RawByteString; external name 'PATHCONVRBS';
 procedure AddToList(var l: Pointer; h: LongInt); external name 'ADDTOLIST';
 function RemoveFromList(var l: Pointer; h: LongInt): boolean; external name 'REMOVEFROMLIST';
 function CheckInList(var l: Pointer; h: LongInt): pointer; external name 'CHECKINLIST';
@@ -470,7 +470,7 @@ Begin
   DiskSize := dos.DiskSize(Drive);
 End;
 
-function DirectoryExists(const Directory: RawBytetring): Boolean;
+function DirectoryExists(const Directory: RawByteString): Boolean;
 var
   tmpStr : String;
   tmpLock: LongInt;