55 lines
570 B
Plaintext
55 lines
570 B
Plaintext
#
|
|
mes 2, EM_WSIZE, EM_PSIZE
|
|
|
|
exp $_m_a_i_n
|
|
pro $_m_a_i_n, 0
|
|
|
|
/* Xor word-sized set */
|
|
|
|
four
|
|
rom EM_WSIZE
|
|
|
|
loc 32769
|
|
loc 1
|
|
loe four /* to defeat constant folding */
|
|
xor
|
|
loc 32768
|
|
cmu EM_WSIZE
|
|
zeq *1
|
|
|
|
loc __LINE__
|
|
cal $fail
|
|
asp 4
|
|
1
|
|
|
|
/* Xor triple-word-sized set */
|
|
|
|
four_by_three
|
|
rom EM_WSIZE*3
|
|
|
|
loc 32769
|
|
loc 32770
|
|
loc 32772
|
|
loc 1
|
|
loc 2
|
|
loc 4
|
|
loe four_by_three
|
|
xor
|
|
loc 32768
|
|
cmu EM_WSIZE
|
|
zne *2
|
|
loc 32768
|
|
cmu EM_WSIZE
|
|
zne *2
|
|
loc 32768
|
|
cmu EM_WSIZE
|
|
zeq *3
|
|
2
|
|
loc __LINE__
|
|
cal $fail
|
|
asp 4
|
|
3
|
|
|
|
cal $finished
|
|
end
|