URL
https://opencores.org/ocsvn/eco32/eco32/trunk
Subversion Repositories eco32
[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [valid.mms] - Rev 322
Go to most recent revision | Compare with Previous | Blame | View Log
LOC 4
LDVTS $0,$0,0
LOC #100
Main SET $1,4
PUSHJ 0,InstTest
JMP Main
a IS #ffffffff % table entry when anything goes
b IS #ffff04ff % table entry when Y <= ROUND_NEAR
c IS #001f00ff % table entry for PUT and PUTI
d IS #ff000000 % table entry for RESUME
e IS #ffff0000 % table entry for SAVE
f IS #ff0000ff % table entry for UNSAVE
g IS #ff000003 % table entry for SYNC
h IS #ffff001f % table entry for GET
table GREG @
TETRA a,a,a,a,a,b,a,b,b,b,b,b,b,b,b,b % 0x
TETRA a,a,a,a,a,b,a,b,a,a,a,a,a,a,a,a % 1x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 2x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 3x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 4x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 5x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 6x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 7x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % 8x
TETRA a,a,a,a,a,a,a,a,0,0,a,a,a,a,a,a % 9x
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % Ax
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % Bx
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % Cx
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % Dx
TETRA a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a % Ex
TETRA a,a,a,a,a,a,c,c,a,d,e,f,g,a,h,a % Fx
tetra IS $1
maxXYZ IS $2
InstTest BN $0,9F
LDTU tetra,$0,0
SR $0,tetra,22
LDT maxXYZ,table,$0
BDIF $0,tetra,maxXYZ
PBNP maxXYZ,9F
ANDNML $0,#ff00
BNZ $0,9F
MOR tetra,tetra,#4
CMP $0,tetra,18
CSP tetra,$0,0
ODIF $0,tetra,7
9H POP 1,0
Go to most recent revision | Compare with Previous | Blame | View Log