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

Fix two minor issues found during review of allot_* patch

slava 2006-10-31 06:00:43 +00:00
parent 415fe0a4a8
commit f485a7ecd4
2 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
library/generic/tuple.factor
View File

@ -15,8 +15,6 @@ IN: kernel-internals
2drop f 2drop f
] if ; ] if ;
: (>tuple) ( array -- tuple ) (clone) tuple-type become ;
IN: generic IN: generic
: class ( object -- class ) : class ( object -- class )

2
vm/math.c
View File

@ -306,7 +306,7 @@ void primitive_bignum_divint(void)
void primitive_bignum_divfloat(void) void primitive_bignum_divfloat(void)
{ {
POP_BIGNUMS(x,y); POP_BIGNUMS(x,y);
box_float( box_double(
s48_bignum_to_double(x) / s48_bignum_to_double(x) /
s48_bignum_to_double(y)); s48_bignum_to_double(y));
} }