URL
https://opencores.org/ocsvn/t400/t400/trunk
Go to most recent revision |
Show entire file |
Details |
Blame |
View Log
Rev 92 |
Rev 94 |
Line 1... |
Line 1... |
;; *******************************************************************
|
;; *******************************************************************
|
;; $Id: test.asm,v 1.1 2006-05-28 18:14:19 arniml Exp $
|
;; $Id: test.asm,v 1.2 2006-05-28 19:22:35 arniml Exp $
|
;;
|
;;
|
;; Checks interrupt on JSR and RET.
|
;; Checks interrupt on JSR and RET.
|
;;
|
;;
|
|
|
;; the cpu type is defined on asl's command line
|
;; the cpu type is defined on asl's command line
|
Line 80... |
Line 80... |
|
|
;; access current M of main program
|
;; access current M of main program
|
ldd 3, 14
|
ldd 3, 14
|
x 0
|
x 0
|
skmbz 0x0
|
skmbz 0x0
|
jmp check_sa_230
|
jp check_sa_230
|
skmbz 0x1
|
skmbz 0x1
|
jmp check_sa_2b0
|
jp check_sa_2b0
|
jmp fail
|
jmp fail
|
|
|
check_sa_230:
|
check_sa_230:
|
check_sa ret_instr_230
|
check_sa ret_instr_230
|
jmp int_finished
|
jmp int_finished
|
check_sa_2b0:
|
check_sa_2b0:
|
check_sa ret_instr_2b0
|
check_sa ret_instr_2b0
|
jmp int_finished
|
|
|
|
int_finished:
|
int_finished:
|
restore_c_m_a
|
restore_c_m_a
|
ret
|
ret
|
;;
|
;;
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.