Some more renaming to make things consistent
This commit is contained in:
parent
2a4945d9c7
commit
af50ef7c09
1 changed files with 4 additions and 4 deletions
|
|
@ -101,18 +101,18 @@
|
|||
(add-queued-entities))
|
||||
|
||||
;; Entity creation/removal interface
|
||||
(export add-named-entity add-entity remove-entity)
|
||||
(export create-named-entity create-entity remove-entity)
|
||||
|
||||
;; Create an entity in the world and return it's ID
|
||||
(define (add-named-entity id . components)
|
||||
(define (create-named-entity id . components)
|
||||
(assert (symbol? id))
|
||||
(assert (every record? components))
|
||||
(queue-add-entity id components)
|
||||
id)
|
||||
|
||||
;; Shortcut for anonymous instancing
|
||||
(define (add-entity . components)
|
||||
(apply add-named-entity (gensym) components))
|
||||
(define (create-entity . components)
|
||||
(apply create-named-entity (gensym) components))
|
||||
|
||||
;; Remove an entity from the world
|
||||
(define (remove-entity id)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue