setter -> @@setter
This commit is contained in:
parent
607e961525
commit
6a52aa2610
|
@ -24,7 +24,7 @@
|
|||
(error "No setter found")))))
|
||||
(set-setter!
|
||||
(lambda (proc setter)
|
||||
(dictionary-set! (attribute proc) 'setter setter))))
|
||||
(dictionary-set! (attribute proc) '@@setter setter))))
|
||||
(set-setter! setter set-setter!)
|
||||
setter))
|
||||
|
||||
|
|
Loading…
Reference in New Issue