From 39cf0b54cba15d98726d7f0fa6225bde3d85b37f Mon Sep 17 00:00:00 2001 From: John Lorentzson Date: Thu, 27 Mar 2025 23:02:43 +0100 Subject: [PATCH] Use real tabs in FORMAT-INST --- wip-duuqnd/compiler.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/wip-duuqnd/compiler.lisp b/wip-duuqnd/compiler.lisp index e82b7e4..b58f85d 100644 --- a/wip-duuqnd/compiler.lisp +++ b/wip-duuqnd/compiler.lisp @@ -9,7 +9,7 @@ (format nil "~A~D" prefix (incf *label-counter*))) (defmacro format-inst (destination control-string &rest format-arguments) - `(format ,destination "~8@T~A~%" (format nil ,control-string ,@format-arguments))) + `(format ,destination "~C~A~%" #\Tab (format nil ,control-string ,@format-arguments))) (defclass reference () ())