Add get-entity
This commit is contained in:
parent
4f8ca4d97b
commit
c7373bccf8
2 changed files with 8 additions and 1 deletions
|
|
@ -22,6 +22,8 @@
|
|||
(check (hash-table-exists? world 'ball) => #t)
|
||||
(check (hash-table-exists? component-sets '<point>) => #t)
|
||||
|
||||
(check (point? (car (get-entity 'ball))) => #t) ;; Get entity retrieves the entity components
|
||||
|
||||
(clear-world)
|
||||
(check (hash-table-size world) => 1) ;; World state does not immediately clear
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue