mac-rom/Libs/InterfaceSrcs/MACINTOSH.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

53 lines
1.4 KiB
Plaintext

;
; File: MACINTOSH.a
;
; Contains: create file Macintosh.d, an assembler load/dump file that contains the
; Macintosh Library Interfaces.
;
; Copyright: © 1985-1992 by Apple Computer, Inc., all rights reserved.
;
; This file is used in these builds: ROM System
;
; Change History (most recent first):
;
; <SM2> 10/28/92 SWC Changed INCLUDEs to a LOAD of StandardEqu.d.
; <2> 6/12/91 LN Removed #includes for private interfaces from public interfaces.
; Changed #include 'HardwareEqu.a' to #include 'HardwarePrivateEqu.a'
;
blanks on
string asis
case obj
RSDHndl EQU $28A ;$FFFFFFFF until initialized
LOAD 'StandardEqu.d'
Include 'HardwarePrivateEqu.a'
;-------------------------------------------------------------------------------
;
; macro OsCall name
;
; This macro is used to handle most of the low-level file manager calls which
; take a Ptr to a parameter block and a Boolean sync/async flag as parameters.
; The Ptr to the paramter block is loaded into a0, and the appropriate trap
; call is made based on the sync flag.
;
macro
OsCall
move.l 4(sp),a0 ; get param pointer.
move.l 8(sp),d0 ; Get ASync flag.
bne.s @1
&SysLst[1] ; tell OS to do it Synchronously
bra.s @2
@1 &SysLst[1] ,ASYNC ; Tell OS to do it Asynchronously
@2 ext.l d0 ; sign extend error code
rts ; return to caller
endm