Ed,
All of those are either math-combination's (which don't let you
specify what types of objects you'd like to do your multiple dispatch
on) or single dispatching methods that dispatch on the object below
the top of the stack (in the case of load-literal or JUMPcc). Still
no sign of the "out-of-the-box" multiple dispatch functionality :)
The circle is now complete; when I left you, I was but the learner,
now I am the master!
Yuuki ;)
On Mar 1, 2007, at 10:11 PM, Eduardo Cavazos wrote:
> On Thursday 01 March 2007 21:57, Matthew Willis wrote:
>
>> Would you happen to have an example of any word in the current code
>> base that uses multiple dispatch?
>
> scratchpad all-words
> ----------
> { border? <default-border> border border-size set-border-size ...
> ----------
> scratchpad dup length .
> 8039
> ----------
> { border? <default-border> border border-size set-border-size ...
> ----------
> scratchpad [ generic? ] subset
> ----------
> { border-size set-border-size hash-count set-hash-deleted ...
> ----------
> scratchpad dup length .
> 894
> ----------
> { border-size set-border-size hash-count set-hash-deleted ...
> ----------
> scratchpad : standard-combination? ( word -- ) generic? [ 0
> standard-combination ] = ;
> ----------
> { border-size set-border-size hash-count set-hash-deleted ...
> ----------
> scratchpad [ standard-combination? not ] subset
> ----------
> { load-literal * + - / < > >base bitor /i number= bitxor <= ...
> ----------
> scratchpad dup length .
> 19
> ----------
> { load-literal * + - / < > >base bitor /i number= bitxor <= ...
> ----------
> scratchpad .
> {
> load-literal
> *
> +
> -
> /
> <
>>
>> base
> bitor
> /i
> number=
> bitxor
> <=
> bitand
> shift
>> =
> mod
> /mod
> JUMPcc
> }
> ----------
> ----------
> scratchpad
>
> ----------------------------------------------------------------------
> ---
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to
> share your
> opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?
> page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> Factor-talk mailing list
> Factor-talk@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/factor-talk
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Factor-talk mailing list
Factor-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/factor-talk
