From c19d67de6c4023ccb578202d74f9a010bc558aa2 Mon Sep 17 00:00:00 2001 From: TakeV Date: Sat, 25 May 2024 04:37:51 -0400 Subject: [PATCH] Add missing imports to game-manager --- modules/game/game-manager.scm | 21 +++++++++++++-------- 1 file changed, 13 insertions(+), 8 deletions(-) diff --git a/modules/game/game-manager.scm b/modules/game/game-manager.scm index 53253e0..338d4c9 100644 --- a/modules/game/game-manager.scm +++ b/modules/game/game-manager.scm @@ -1,10 +1,15 @@ (define-module (game game-manager) - #:pure - #:use-module (scheme base) - #:use-module (ces system html-canvas-renderer) - #:use-module (game level-manager) - #:export (init-game-entities - init-game-systems)) + #:pure + #:use-module (scheme base) + #:use-module (dom document) + #:use-module (dom element) + #:use-module (dom image) + #:use-module (dom window) + #:use-module (dom canvas) + #:use-module (ces system html-canvas-renderer) + #:use-module (game level-manager) + #:export (init-game-entities + init-game-systems)) (define canvas (get-element-by-id "canvas")) (define context (get-context canvas "2d")) @@ -17,6 +22,6 @@ (create-room! room-background 0 0 128 64))) (define (init-game-systems) - "Returns a list of initial game systems. + "Returns a list of initial game systems. Note: Systems are executed sequentially. " - (list (create-html-canvas-renderer context))) \ No newline at end of file + (list (create-html-canvas-renderer context)))