Remove old debug print from COMPILE-IR for IR-CALL
This commit is contained in:
parent
c6ba4228b3
commit
fa4fa088fe
1 changed files with 1 additions and 2 deletions
|
@ -184,8 +184,7 @@ is the responsibility of the pre-assembly compilation step."
|
|||
:do (setf *last-instruction* :useless)
|
||||
:unless (eql (strategy (allocation-details arg)) :direct-to-argvec)
|
||||
:do (emit-lda (data-reference arg))
|
||||
(emit-sta (cons :address (+ arg-index +argvec-offset+)))
|
||||
(format t "~D. ~A~%" arg-index arg))
|
||||
(emit-sta (cons :address (+ arg-index +argvec-offset+))))
|
||||
(emit-asm-instruction :opcode #x20 :operand (callee inst) :byte-length 3)
|
||||
(emit-store-data (output inst)))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue