BirDt/imugi
1
0
Fork 0
Code Issues 14 Pull requests Projects 1 Wiki Activity Actions

Add some simple tests

Browse source
This commit is contained in:
BirDt_ 2026-04-02 14:35:13 +08:00
parent 99dd46d3f6
commit 36d72dded2
2 changed files with 15 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
engine/core.scm
View file

@ -382,7 +382,7 @@
(when (eq? mode '3d)
(begin-mode-3d (*active-camera-3d*)))
(for-each
(lambda (x) (x))
(lambda (render-obj) (cdr render-obj))
(sort queue
(lambda (render-obj-a render-obj-b)
(< (car render-obj-a)
@ -391,7 +391,7 @@
(end-mode-2d))
(when (eq? mode '3d)
(end-mode-3d)))
(set! queue '())))
(hash-table-set! render-queues queue-name '())))
;; Frame generation and game loop
(export resolve-queues next-frame *clear-color* perform-render)