networks: Make network and network-form transparent.
This commit is contained in:
parent
ff6fa2c88b
commit
eb3e851a9d
1 changed files with 2 additions and 2 deletions
|
@ -183,7 +183,7 @@
|
|||
;;; The domain mapping does not have to assign domains to all
|
||||
;;; variables (e.g., it may be empty), but in this case the functions
|
||||
;;; which need to know the domains will not work.
|
||||
(struct network (functions domains))
|
||||
(struct network (functions domains) #:transparent)
|
||||
|
||||
;;; Builds a network from a given hash table assigning functions to
|
||||
;;; variables by attributing Boolean domains to every variable.
|
||||
|
@ -264,7 +264,7 @@
|
|||
;;; The domain mapping does not have to assign domains to all
|
||||
;;; variables (e.g., it may be empty), but in this case the functions
|
||||
;;; which need to know the domains will not work.
|
||||
(struct network-form (forms domains))
|
||||
(struct network-form (forms domains) #:transparent)
|
||||
|
||||
;;; Build an update function from an update function form.
|
||||
(define (update-function-form->update-function form)
|
||||
|
|
Loading…
Reference in a new issue