1 /****************************************************************************
3 THIS SOFTWARE IS NOT COPYRIGHTED
5 HP offers the following for use in the public domain. HP makes no
6 warranty with regard to the software or it's performance and the
7 user accepts the software "AS IS" with all faults.
9 HP DISCLAIMS ANY WARRANTIES, EXPRESS OR IMPLIED, WITH REGARD
10 TO THIS SOFTWARE INCLUDING BUT NOT LIMITED TO THE WARRANTIES
11 OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
13 ****************************************************************************/
15 /* Interrupt Vector Table entry macros */
17 #define cstring(Len,String) .byte Len !\
20 #define cstringz(Len,String) .byte Len !\
24 mtctl
%r0
,%pcoq
; throw away iiaoq head pointer
, tail
->head
25 mfctl
%pcoq
,%r1
; get tail pointer
26 mtctl
%r1
,%pcoq
; insert tail pointer
27 ldo
4(%r1
),%r1
; advance tail pointer
28 mtctl
%r1
,%pcoq
; insert
new tail pointer
, former tail
->head
31 #ifdef PRINTSTRING_LED
32 PrintString
.macro NString
,Num
35 addil L
%NString
-$global$
,%dp
37 ldo R
%NString
-$global$
(%r1
),%arg0
45 PrintString
.macro NString
,Num
49 ldi NString
-Str01
,%arg0
60 PrintString
.macro NString
,Num
64 ldi NString
-Str01
,%arg0
73 PrintString
.macro NString
,Num
77 ldi NString
-Str01
,%arg0
89 /* IVA register array offets */