Paste: multi-methods

( scratchpad ) QUALIFIED: multi-methods

( scratchpad ) multi-methods:GENERIC: plus ( obj1 obj2 -- obj3 )
               METHOD: plus { real real } + ;
               METHOD: plus { string string } append ;

( scratchpad ) 1 2 plus .
3

( scratchpad ) "hello " "world" plus .
"hello world"

Annotation: what haskell can't do

IN: scratchpad Loading resource:extra/multi-methods/multi-methods.factor
Loading resource:basis/shuffle/shuffle.factor
Loading resource:basis/shuffle/shuffle-docs.factor
QUALIFIED: math QUALIFIED: multi-methods
IN: scratchpad 
IN: scratchpad multi-methods:GENERIC: + ( a b -- a+b )
IN: scratchpad 
IN: scratchpad Command: restart
multi-methods:METHOD: + { real real } math:+ ;
IN: scratchpad 
IN: scratchpad multi-methods:METHOD: + { string string } append ;
IN: scratchpad 
IN: scratchpad 1 2 + .
3
IN: scratchpad "hello " "world" + .
"hello world"

New Annotation