mac-rom/Toolbox/CommToolbox/FileTransferMgr/FileTransferMgrUtilities.c
Elliot Nunn 4325cdcc78 Bring in CubeE sources
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included.

The Tools directory, containing mostly junk, is also excluded.
2017-12-26 09:52:23 +08:00

43 lines
1.5 KiB
C

/*
File: FileTransferMgrUtilities.c
Contains: Utility routines for the File Transfer Manager and glue
Written by: Byron Han
Copyright: © 1988-1992 by Apple Computer, Inc., all rights reserved.
Change History (most recent first):
<8> 2/7/92 BH fixed problem with calling FDEFExecuteFDEF with old calling
conventions for CubeE (we are now aligning all of file transfer
mgr code to use conventions introduced in <4> by darin,
essentially reversing <7> <6> and <5>
<7> 11/18/91 DTY Make the ROM build use the CubeE version of FDEFExecuteFDEF.
<6> 10/4/91 JSM Change PsychoticFarmerOrLater conditionals to TheFuture.
<5> 10/2/91 DTY Conditionalise <2> and <4> out of CubeE.
<4> 7/10/91 dba use a parameter of type FTHandle and figure out the defProc
prarameter automatically
<3> 7/10/91 BH rename to FDEFExecuteFDEF
<2> 7/10/91 BH made FDEFCallFDEF a pascal long instead of untyped routine
<1> 3/14/90 BBH first checked in
*/
// This file is INCLUDED by either the manager or the glue code
// it does NOT stand alone
pascal long
FDEFExecuteFDEF(FTHandle theHandle, short msg, long p1, long p2, long p3)
{
long rval;
CRMToolContext context;
pascal long (*callProc) (FTHandle, short, long, long, long);
CRMToolPreflight((**theHandle).procID, &context);
(ProcPtr) callProc = (**theHandle).defProc;
rval = (*callProc) (theHandle, msg, p1, p2, p3); /* and away she goes */
CRMToolPostflight(&context);
return(rval);
}