mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2025-01-15 12:30:53 +00:00
50 lines
1.4 KiB
Plaintext
50 lines
1.4 KiB
Plaintext
|
;
|
|||
|
; File: Timeout.a
|
|||
|
;
|
|||
|
; Contains:
|
|||
|
;
|
|||
|
; Written by: Clinton Bauder
|
|||
|
;
|
|||
|
; Copyright: <09> 1992-1993 by Apple Computer, Inc., All rights reserved.
|
|||
|
;
|
|||
|
; This file contains support code for the CAM and Connection timeout routines
|
|||
|
;
|
|||
|
; Change History (most recent first):
|
|||
|
;
|
|||
|
; <SM6> 10/14/93 pdw <MC> roll-in.
|
|||
|
; <SM5> 9/9/93 pdw Don't know again.
|
|||
|
; <SM4> 6/29/93 pdw I don't know.
|
|||
|
; <SM3> 5/5/93 PW Converted names to meanies-friendly names. Updated with latest
|
|||
|
; from Ludwig stuff.
|
|||
|
; <SM2> 1/31/93 PW Update from the latest of Ludwig. Also changes required for PDM
|
|||
|
; (will update Ludwig with these as needed myself).
|
|||
|
;
|
|||
|
;==========================================================================
|
|||
|
|
|||
|
MACHINE MC68020 ; '020-level
|
|||
|
BLANKS ON ; assembler accepts spaces & tabs in operand field
|
|||
|
PRINT OFF ; do not send subsequent lines to the listing file
|
|||
|
; don't print includes
|
|||
|
CASE OBJECT ; preserve case in object file
|
|||
|
|
|||
|
|
|||
|
;--------------------------------------------------------------------------
|
|||
|
|
|||
|
|
|||
|
; LOAD 'StandardEqu.d' ; from StandardEqu.a and for building ROMs
|
|||
|
; INCLUDE 'HardwareEqu.a'
|
|||
|
INCLUDE 'Debug.a' ; for NAME macro
|
|||
|
; INCLUDE 'ACAM.a'
|
|||
|
|
|||
|
|
|||
|
getTimerPB PROC EXPORT
|
|||
|
|
|||
|
move.l a1,d0 ; Parameter block is in a1
|
|||
|
rts ; return it
|
|||
|
|
|||
|
NAME 'getTimerPB'
|
|||
|
|
|||
|
ENDP
|
|||
|
|
|||
|
END
|
|||
|
|