steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' of git://factorcode.org/git/factor

db4
Doug Coleman 2008-11-29 13:48:16 -06:00
parent 338e592935 84d4c29c93
commit bab45d8915
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/math/partial-dispatch/partial-dispatch.factor
View File

@ -117,7 +117,9 @@ M: word integer-op-input-classes
{ fixnum bignum float } { fixnum bignum float }
[ [ dup 3array ] [ swap method ] 2bi ] with { } map>assoc [ [ dup 3array ] [ swap method ] 2bi ] with { } map>assoc
[ nip ] assoc-filter [ nip ] assoc-filter
[ def>> peek ] assoc-map % ; [ def>> ] assoc-map
[ nip length 1 = ] assoc-filter
[ first ] assoc-map % ;
SYMBOL: math-ops SYMBOL: math-ops