mega-cache-quot ( methods -- quot/f )


Vocabulary
generic.single

Definition
IN: generic.single

HOOK: mega-cache-quot combination ( methods -- quot/f )


Methods
USING: generic.hook generic.single generic.single.private
kernel.private quotations sequences ;

M: hook-combination mega-cache-quot
1quotation picker [ lookup-method (execute) ] surround ;


USING: accessors generic.single generic.single.private
generic.standard namespaces sequences ;

M: standard-combination mega-cache-quot
combination get #>> make-empty-cache \ mega-cache-lookup
[ ] 4sequence ;