URL
https://opencores.org/ocsvn/t400/t400/trunk
Subversion Repositories t400
Compare Revisions
- This comparison shows the changes necessary to convert path
/
- from Rev 76 to Rev 77
- ↔ Reverse comparison
Rev 76 → Rev 77
/trunk/sw/verif/include/int_macros.inc
0,0 → 1,45
;; ******************************************************************* |
;; $Id: int_macros.inc,v 1.1 2006-05-28 02:49:30 arniml Exp $ |
;; |
;; Defines macros for interrupt tests. |
;; |
|
check_sa MACRO addr |
lbi 3, 15 |
;; request nibble 0 of SA |
ogi 0x0 |
inl |
;; check this nibble |
x 0 |
clra |
IF addr & 0xf <> 0 |
aisc addr & 0xf |
ENDIF |
ske |
jmp fail |
|
;; request nibble 1 of SA |
ogi 0x1 |
inl |
;; check this nibble |
x 0 |
clra |
IF addr & 0x0f0 <> 0 |
aisc (addr >> 4) & 0xf |
ENDIF |
ske |
jmp fail |
|
;; request nibble 2 of SA |
ogi 0x2 |
inl |
;; check this nibble |
x 0 |
clra |
IF addr & 0xf00 <> 0 |
aisc (addr >> 8) & 0xf |
ENDIF |
ske |
jmp fail |
|
ENDM |