aboutsummaryrefslogtreecommitdiff
path: root/tests/engine-test.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/engine-test.scm')
-rw-r--r--tests/engine-test.scm22
1 files changed, 11 insertions, 11 deletions
diff --git a/tests/engine-test.scm b/tests/engine-test.scm
index 99bb12f..79b475e 100644
--- a/tests/engine-test.scm
+++ b/tests/engine-test.scm
@@ -38,7 +38,7 @@
(import (prefix sdl2-image "img:"))
;; --- Entity module (mock minimal structs) ---
-(module downstroke/entity *
+(module downstroke-entity *
(import scheme (chicken base))
(define (entity-ref entity key #!optional (default #f))
(let loop ((plist entity))
@@ -46,10 +46,10 @@
((null? plist) (if (procedure? default) (default) default))
((eq? (car plist) key) (cadr plist))
(else (loop (cddr plist)))))))
-(import downstroke/entity)
+(import downstroke-entity)
;; --- Input module (mock) ---
-(module downstroke/input *
+(module downstroke-input *
(import scheme (chicken base) defstruct)
(defstruct input-config
actions keyboard-map joy-button-map controller-button-map
@@ -75,12 +75,12 @@
state)
(define (input-held? state action)
#f))
-(import downstroke/input)
+(import downstroke-input)
;; --- World module (mock) ---
-(module downstroke/world *
+(module downstroke-world *
(import scheme (chicken base) defstruct)
- (import downstroke/entity)
+ (import downstroke-entity)
(defstruct camera x y)
(defstruct scene entities tilemap camera tileset-texture camera-target)
;; Mock camera-follow! - just clamps camera position
@@ -94,22 +94,22 @@
((null? entities) #f)
((member tag (entity-ref (car entities) #:tags '())) (car entities))
(else (loop (cdr entities)))))))
-(import downstroke/world)
+(import downstroke-world)
;; --- Real deps ---
(import simple-logger) ;; required by input.scm
(include "assets.scm")
-(import downstroke/assets)
+(import downstroke-assets)
;; --- Renderer module (mock) ---
-(module downstroke/renderer *
+(module downstroke-renderer *
(import scheme (chicken base))
(define (render-scene! . args) #f))
-(import downstroke/renderer)
+(import downstroke-renderer)
;; --- Engine module (real) ---
(include "engine.scm")
-(import downstroke/engine)
+(import downstroke-engine)
;; --- Tests ---