fix for RSHIFT implemented as left shift
This commit is contained in:
parent
2eaa43f85f
commit
c0434e415a
|
|
@ -923,7 +923,7 @@ defcode LSHIFT
|
||||||
/* ( u1 u -- u2 ) Logical (unsigned) shift right by u bits */
|
/* ( u1 u -- u2 ) Logical (unsigned) shift right by u bits */
|
||||||
defcode RSHIFT
|
defcode RSHIFT
|
||||||
pop %ecx
|
pop %ecx
|
||||||
shll %cl,(%esp)
|
shrl %cl,(%esp)
|
||||||
NEXT
|
NEXT
|
||||||
|
|
||||||
.macro defzcmp label,opcode,name="\label",flags=0
|
.macro defzcmp label,opcode,name="\label",flags=0
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue