remove code that dealt with delegates
parent
c5979caf75
commit
64be3e3f81
|
@ -207,7 +207,7 @@ DEFER: _
|
|||
"predicate" word-prop [ dupd call assure ] curry ;
|
||||
|
||||
: slot-readers ( class -- quot )
|
||||
all-slots rest ! tail gets rid of delegate
|
||||
all-slots
|
||||
[ name>> reader-word 1quotation [ keep ] curry ] map concat
|
||||
[ ] like [ drop ] compose ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue