diff --git a/engine/loader.scm b/engine/loader.scm new file mode 100644 index 0000000..bcea717 --- /dev/null +++ b/engine/loader.scm @@ -0,0 +1,18 @@ +(module (engine loader) () +(import (scheme) + (chicken base) + (chicken process-context) + (engine core) + (engine math) + (engine components core) + (engine drawing) + (engine input) + (engine scene) + raylib + (srfi 1) + (srfi 99)) + +(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 65b3ed3..e2136c8 100644 --- a/samples/tic-tac-toe.scm +++ b/samples/tic-tac-toe.scm @@ -1,7 +1,4 @@ -(module (tic-tac-toe) () -(import scheme - (chicken base) - (chicken random) +(import (chicken random) (engine core) (engine math) (engine components core) @@ -380,4 +377,3 @@ ((main-menu)) (create-window) -)