Summary
delegate.private vocabulary

Words

Tuple classes
ClassSuperclassSlots
broadcast consultation
consultation tuplegroup class quot loc


Predicate classes
ClassSuperclass
consult-method method


Generic words
WordStack effect
(consult-method-quot)( consultation quot word -- object )
group-words( group -- words )


Ordinary words
WordStack effect
<broadcast>( group class quot -- consultation )
<consultation>( group class quot -- consultation )
add-new-definitions( protocol wordlist -- )
added-words( protocol wordlist -- added-words )
check-broadcast-group( group -- group )
check-generic( generic -- )
consult-method-quot( consultation word -- object )
consult-methods( consultation -- )
create-consult-method( word consultation -- method )
define-consult-method( word consultation -- )
each-generic( consultation quot -- )
fill-in-depth( wordlist -- wordlist' )
forget-all-methods( classes words -- )
forget-old-definitions( protocol new-wordlist -- )
initialize-protocol-props( protocol wordlist -- )
lost-words( protocol wordlist -- lost-words )
protocol-consult( protocol -- consulters )
protocol-users( protocol -- users )
protocol-words( protocol -- words )
register-consult( consultation -- )
show-words( wordlist' -- wordlist )
slot-group-words( slots -- words )
slot-words,( slot-spec -- )
unconsult-method( word consultation -- )
unconsult-methods( consultation -- )
unregister-consult( consultation -- )


Class predicate words
WordStack effect
broadcast?( object -- ? )
consult-method?( object -- ? )
consultation?( object -- ? )