Clarify comments in GENERATE-CODE for NODE-BRANCH

This commit is contained in:
John Lorentzson 2025-03-27 23:36:15 +01:00
parent 39cf0b54cb
commit 4918124361

View file

@ -47,8 +47,9 @@
(let ((else-label (genlabel "ELSE")))
(format-inst t "LDA RESULT")
(format-inst t "BNE ~A" else-label)
;; THEN branch
;; The THEN branch
(generate-code (branch-next node))
;; The ELSE branch
(format t "~%~A:~%" else-label)))
(defclass node-dotimes (node)