USING: accessors kernel math prettyprint sequences words ; IN: rosetta-code.unknown-method-call TUPLE: foo num ; C: foo GENERIC: add5 ( x -- y ) M: foo add5 num>> 5 + ; 42 ! construct a foo "add" "5" append ! construct a word name ! must specify vocab to look up a word "rosetta-code.unknown-method-call" lookup-word execute . ! 47