Last change
on this file since 7bf3856 was 3ae31e9, checked in by Thomas Lopatic <thomas@…>, 8 years ago |
Imported original source code.
|
-
Property mode
set to
100755
|
File size:
806 bytes
|
Line | |
---|
1 | * ------------------------------------------------------------------------------
|
---|
2 | * mtint1.s -- Multi-Tasker -- Video Second Level Interrupt Handler
|
---|
3 | * Version 2 -- 1988-04-13 -- D.N. Lynx Crowe
|
---|
4 | * ------------------------------------------------------------------------------
|
---|
5 | *
|
---|
6 | .text
|
---|
7 | *
|
---|
8 | .xdef __MTInt1 * Video Second Level Interrupt Handler
|
---|
9 | *
|
---|
10 | .xref SM_Wait * Sempahore wait function
|
---|
11 | *
|
---|
12 | .xref MT_ISEM1 * Video interrupt semaphore
|
---|
13 | .xref resvec4 * Video interrupt vector
|
---|
14 | *
|
---|
15 | * __MTInt1 -- Video Second Level Interrupt Handler
|
---|
16 | * -------- ------------------------------------
|
---|
17 | __MTInt1: move.l #MT_ISEM1,-(a7) * Wait on interrupt semaphore
|
---|
18 | jsr SM_Wait * ...
|
---|
19 | tst.l (a7)+ *
|
---|
20 | movea.l resvec4,a0 * (*resvec4)()
|
---|
21 | jsr (a0) * ...
|
---|
22 | bra __MTInt1 * do it again
|
---|
23 | *
|
---|
24 | *
|
---|
25 | .end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.