Remove old debug print from COMPILE-IR for IR-CALL

This commit is contained in:
John Lorentzson 2025-07-20 18:30:59 +02:00
parent c6ba4228b3
commit fa4fa088fe

View file

@ -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)))