diff --git a/engine/loader.scm b/engine/loader.scm index b5fb09f..bcea717 100644 --- a/engine/loader.scm +++ b/engine/loader.scm @@ -1,4 +1,4 @@ -(module (engine loader) +(module (engine loader) () (import (scheme) (chicken base) (chicken process-context) @@ -12,6 +12,7 @@ (srfi 1) (srfi 99)) - -(load (last (command-line-arguments))) +(load (last (command-line-arguments)) + (lambda (form) + (eval form (interaction-environment)))) ) diff --git a/samples/tic-tac-toe.scm b/samples/tic-tac-toe.scm index ab242e3..e2136c8 100644 --- a/samples/tic-tac-toe.scm +++ b/samples/tic-tac-toe.scm @@ -1,3 +1,14 @@ +(import (chicken random) + (engine core) + (engine math) + (engine components core) + (engine drawing) + (engine input) + (engine scene) + raylib + (srfi 1) + (srfi 99)) + (register-event-bus 'turn-change) (define draw-text-entities @@ -366,4 +377,3 @@ ((main-menu)) (create-window) -