Commit 8d3b9bf2 authored by wlott's avatar wlott
Browse files

Added another flavor of cal that allows one to specify ``0'' as the second

register because we actually try to use this in the li pseudo instruction.
parent c749b537
......@@ -262,6 +262,10 @@
(r2 :argument register)
(r3 :same-as r2)
(i :argument (signed-byte 16)))
(d (op :constant #xC8)
(r2 :argument register)
(r3 :argument (integer 0 0))
(i :argument (signed-byte 16)))
(d (op :constant #xC8)
(r2 :argument register)
(r3 :argument address-register)
......@@ -557,7 +561,7 @@
((unsigned-byte 4)
(inst lis reg value))
((signed-byte 16)
(inst cal reg value))
(inst cal reg 0 value))
((unsigned-byte 16)
(inst cal16 reg value))
((or (signed-byte 32) (unsigned-byte 32))
......@@ -578,7 +582,7 @@
((unsigned-byte 4)
(inst lis reg value))
((signed-byte 16)
(inst cal reg value))
(inst cal reg 0 value))
((unsigned-byte 16)
(inst cal16 reg value))
((or (signed-byte 32) (unsigned-byte 32))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment