Explorar o código

+ even more stuff added

olle %!s(int64=21) %!d(string=hai) anos
pai
achega
ae0d5d47c0
Modificáronse 1 ficheiros con 8 adicións e 2 borrados
  1. 8 2
      rtl/macos/macostp.inc

+ 8 - 2
rtl/macos/macostp.inc

@@ -698,10 +698,16 @@ external 'InterfaceLib';
 function FSpDelete(spec: FSSpec): OSErr;
 external 'InterfaceLib';
 
-FUNCTION FSpSetFLock({CONST}VAR spec: FSSpec): OSErr;
+FUNCTION FSpGetFInfo(const spec: FSSpec; VAR fndrInfo: FInfo): OSErr;
 external 'InterfaceLib';
 
-FUNCTION FSpRstFLock({CONST}VAR spec: FSSpec): OSErr;
+FUNCTION FSpSetFInfo(const spec: FSSpec; const fndrInfo: FInfo): OSErr;
+external 'InterfaceLib';
+
+FUNCTION FSpSetFLock(const spec: FSSpec): OSErr;
+external 'InterfaceLib';
+
+FUNCTION FSpRstFLock(const spec: FSSpec): OSErr;
 external 'InterfaceLib';
 
 function FSClose(refNum: Integer): OSErr;