Stacken/c64-livecoding
6
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Use real tabs in FORMAT-INST

Browse source
This commit is contained in:
John Lorentzson 2025-03-27 23:02:43 +01:00
parent b22f043523
commit 39cf0b54cb
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
wip-duuqnd/compiler.lisp
View file

@ -9,7 +9,7 @@
(format nil "~A~D" prefix (incf *label-counter*))) (format nil "~A~D" prefix (incf *label-counter*)))
(defmacro format-inst (destination control-string &rest format-arguments) (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 () ()) (defclass reference () ())