mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-27 12:57:21 +00:00
Add GetWDInfo glue
This commit is contained in:
parent
073047e119
commit
fa39132cdc
@ -187,3 +187,18 @@ pascal OSErr Create (ConstStr255Param fileName, short vRefNum, OSType creator,
|
|||||||
// save finder info
|
// save finder info
|
||||||
return PBSetFInfoSync(&pb);
|
return PBSetFInfoSync(&pb);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
pascal OSErr GetWDInfo(short wdRefNum, short *vRefNum, long *dirID,
|
||||||
|
long *procID)
|
||||||
|
{
|
||||||
|
OSErr err;
|
||||||
|
WDPBRec pb;
|
||||||
|
memset(&pb, 0, sizeof(pb));
|
||||||
|
pb.ioVRefNum = wdRefNum;
|
||||||
|
err = PBGetWDInfo(&pb, false);
|
||||||
|
*vRefNum = pb.ioWDVRefNum;
|
||||||
|
*dirID = pb.ioWDDirID;
|
||||||
|
*procID = pb.ioWDProcID;
|
||||||
|
return err;
|
||||||
|
}
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user