mac-rom/Interfaces/AIncludes/FileTransferTools.a
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

86 lines
1.9 KiB
Plaintext

;_____________________________________________
; File: FileTransferTools.a
;
; Contains: Assembler Interface to the File Transfer Manager Tools
;
; Written by: Byron Han
;
; Copyright: © 1988-1991 by Apple Computer, Inc.
; All rights reserved.
;
; Change History (most recent first):
;
; <6> 8/27/91 CH Updated interface headers for consistency.
; <5> 8/15/91 MH Remove outer parens from conditional assembly predicates to
; match standard form
; <4> 6/26/91 BH added messages for ftSendMsg and ftReceiveMsg
; <3> 6/24/91 BH change conditional wrapper to conform to standards
; <2> 1/30/91 gbm sab, #38: Change the Ôalready including this fileÕ variable to
; all uppercase (for security reasons)
; <1> 3/14/90 BBH first checked in
;
; To Do:
;_____________________________________________
IF &TYPE('__INCLUDINGFILETRANSFERTOOLS__') = 'UNDEFINED' THEN
__INCLUDINGFILETRANSFERTOOLS__ SET 1
; messages for fDEFs
ftInitMsg EQU 0
ftDisposeMsg EQU 1
ftSuspendMsg EQU 2
ftResumeMsg EQU 3
ftMenuMsg EQU 4
ftEventMsg EQU 5
ftActivateMsg EQU 6
ftDeactivateMsg EQU 7
ftGetErrorStringMsg EQU 8
ftAbortMsg EQU 52
ftStartMsg EQU 100
ftExecMsg EQU 102
ftSendMsg EQU 103
ftReceiveMsg EQU 104
; messages for validate DefProc
ftValidateMsg EQU 0
ftDefaultMsg EQU 1
; messages for Setup DefProc
ftSpreflightMsg EQU 0
ftSsetupMsg EQU 1
ftSitemMsg EQU 2
ftSfilterMsg EQU 3
ftScleanupMsg EQU 4
; messages for scripting defProc
ftMgetMsg EQU 0
ftMsetMsg EQU 1
; messages for localization defProc
ftL2English EQU 0
ftL2Intl EQU 1
; def type
fsetType EQU 'fset'
fvalType EQU 'fval'
flocType EQU 'floc'
fscrType EQU 'fscr'
fdefType EQU 'fdef'
fbndType EQU 'fbnd'
fverType EQU 'vers'
FTSetupStruct Record 0
theDialog ds.l 1
count ds.w 1
theConfig ds.l 1
procID ds.w 1
FTSetupStructSize EQU *
EndR
ENDIF ; already included