refactor + some extra tests

This commit is contained in:
BirDt_ 2026-04-02 22:04:17 +08:00
parent 36d72dded2
commit 5456f643e3
2 changed files with 7 additions and 2 deletions

View file

@ -363,8 +363,8 @@
(assert (symbol? queue-name))
(assert (integer? layer))
(assert (procedure? thunk))
(set! (hash-table-ref render-queues queue-name)
(cons (cons layer thunk) (hash-table-ref render-queues queue-name))))
(hash-table-set! render-queues queue-name
(cons (cons layer thunk) (hash-table-ref render-queues queue-name))))
;; Evaluate a single render queue with a specific mode.
;; Render objects are sorted by their layer