X-Git-Url: https://git.jsancho.org/?p=gacela.git;a=blobdiff_plain;f=src%2Fgacela.scm;h=3b65aff208d01470b6954ef2166c9096e8b11649;hp=7fb242fdb94561afce498a328e8629105bed7e03;hb=f3d35ed115ff03f513c93a05325885e44da10891;hpb=253656b7188f5d1f3684a640530f248d29995eef diff --git a/src/gacela.scm b/src/gacela.scm index 7fb242f..3b65aff 100644 --- a/src/gacela.scm +++ b/src/gacela.scm @@ -18,11 +18,15 @@ (define-module (gacela gacela) #:use-module (gacela system) #:use-module (ice-9 threads) - #:use-module (srfi srfi-1)) + #:use-module (srfi srfi-1) + #:export (make-world)) ;;; Entities and components +(define (make-world . entities) + (apply make-entity-set entities)) + (define entities-mutex (make-mutex)) (define game-entities '()) (define game-components '())