Indentation correction

This commit is contained in:
John Lorentzson 2025-07-03 16:57:20 +02:00
parent 771748d2c2
commit 0117df02f8

View file

@ -121,9 +121,9 @@
(defun emit-load-data (data)
(if (or (member (strategy (allocation-details data))
'(:accumulator :direct-to-argvec))
(equal *last-instruction* (list :store data))
(equal *last-instruction* (list :load data)))
'(:accumulator :direct-to-argvec))
(equal *last-instruction* (list :store data))
(equal *last-instruction* (list :load data)))
(setf *last-instruction* '(:useless))
(progn
(if (eql (strategy (allocation-details data)) :constant)