From fa4fa088fede62e85e09b069dc4ed4145770ef20 Mon Sep 17 00:00:00 2001 From: John Lorentzson Date: Sun, 20 Jul 2025 18:30:59 +0200 Subject: [PATCH] Remove old debug print from COMPILE-IR for IR-CALL --- wip-duuqnd/user-side-compiler/backend/code-generator.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/wip-duuqnd/user-side-compiler/backend/code-generator.lisp b/wip-duuqnd/user-side-compiler/backend/code-generator.lisp index 4c2488c..9d176dd 100644 --- a/wip-duuqnd/user-side-compiler/backend/code-generator.lisp +++ b/wip-duuqnd/user-side-compiler/backend/code-generator.lisp @@ -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)))