program test,,globals


names:
	.long x0
	.long x1
	.long x2
	.long x3
	.long x4
	.long x5
	.long x6
	.long x7
	.long x8
	.long x9
	.long x10
	.long x11
	.long x12
	.long x13
	.long x14
	.long x15
	.long x16
	.long x17
	.long x18
	.long x19
	.long x20
	.long x21,x22,x23,x24,x25,x26,x27,x28,x29,x30,x31,x32,x33,x34
	.long xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx,xxx

x0:     .asciz ~flag~
x1:     .asciz ~interupts~
x2:     .asciz ~solic~
x3:     .asciz ~unsol~
x4:     .asciz ~dmas~
x5:     .asciz ~start~
x6:     .asciz ~cancel~
x7:     .asciz ~cancel_dma~
x8:     .asciz ~timeout~
x9:     .asciz ~timeout_dma~
x10:    .asciz ~con_init~
x11:    .asciz ~init~
x12:    .asciz ~wc~
x13:    .asciz ~csr~
x14:    .asciz ~ps~
x15:    .asciz ~pstmo~
x16:    .asciz ~wctmo~
x17:    .asciz ~badint~
x18:    .asciz ~wcdma~
x19:    .asciz ~psdma~
x20:    .asciz ~badp1~
x21:    .asciz ~clean2~
x22:    .asciz ~num_wcafter~
x23:    .asciz ~num_psafter~
x24:    .asciz ~num_wcbefore~
x25:    .asciz ~num_nzwc~
x26:    .asciz ~num_csafter~
x27:    .asciz ~num_int3~
x28:    .asciz ~--~
x29:    .asciz ~tmo~
x30:    .asciz ~int~
x31:    .asciz ~can~
x32:    .asciz ~bsy~
x33:    .asciz ~notready~
x34:    .asciz ~maxbsy~

xxx:    .asciz ~--~

function main[argc,argv]
register n1,n2,nn,s
external verbose,names
{
n1 := val[argv[1],10]
n2 := val[argv[2],10]
verbose := 0
if argc > 3
   verbose++
fi
aedinit[0]      ;aed assign and init
eprintf["                 Decimal   Hexidecimal    Octal%n"]
loop for nn := n1 to n2
   eprintf["Value %3d = ",nn]
   s := obyte[nn,100]
   eprintf["%10d %10x %10o%t%s%n",s,s,s,names[nn]]
next nn
}
.end