Reimplement wireworld update; add stubs for new object types.
This commit is contained in:
parent
4c12ccc559
commit
984ea4df67
4 changed files with 125 additions and 92 deletions
|
@ -601,6 +601,9 @@ the default ORIENTATION value of 'orthogonal' is supported."
|
|||
(assq-ref properties 'target-y)))
|
||||
('gem (list x y obj:gem))
|
||||
('gate (list x y obj:gate))
|
||||
;; TODO: Implement these
|
||||
('and-gate (list x y obj:block:copper))
|
||||
('electric-switch (list x y obj:wall:copper))
|
||||
(_ (error "unsupported object type" type)))))
|
||||
(object-layer-objects layer))))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue