Here it is. --daishi % csi -:d -R numbers -eval '(bitwise-and (random (expt 2 64)) (- (expt 2 64) 1))' [debug] application startup... [debug] heap resized to 500000 bytes [debug] stack bottom is 0xbffff388. [debug] entering toplevel toplevel... [debug] stack resized to 131072 bytes [debug] entering toplevel library_toplevel... [debug] entering toplevel eval_toplevel... [debug] entering toplevel extras_toplevel... [debug] entering toplevel match_support_toplevel... ; loading /usr/local/chicken-2.2/lib/chicken/numbers.scm ... ; loading /usr/local/chicken-2.2/lib/chicken/numbers-base.so ... [debug] entering toplevel toplevel... [debug] entering toplevel regex_toplevel... [debug] forcing finalizers... [debug] running 12 finalizers (3 live, 15 allocated) ... *** glibc detected *** double free or corruption (fasttop): 0x080a6c50 *** zsh: abort csi -:d -R numbers -eval
% csi -:d -R numbers -eval '(bitwise-and (random 18446744073709551616) 18446744073709551615)' [debug] application startup... [debug] heap resized to 500000 bytes [debug] stack bottom is 0xbfffea78. [debug] entering toplevel toplevel... [debug] stack resized to 131072 bytes [debug] entering toplevel library_toplevel... [debug] entering toplevel eval_toplevel... [debug] entering toplevel extras_toplevel... [debug] entering toplevel match_support_toplevel... ; loading /usr/local/chicken-2.2/lib/chicken/numbers.scm ... ; loading /usr/local/chicken-2.2/lib/chicken/numbers-base.so ... [debug] entering toplevel toplevel... [debug] entering toplevel regex_toplevel... [debug] forcing finalizers... [debug] running 5 finalizers (3 live, 8 allocated) ... [debug] application terminated normally. At Wed, 12 Oct 2005 08:27:31 +0200, felix winkelmann wrote: > > Oh, and please run csi with -:d - I'd like to see whether this > happens during finalization... > > cheers, > felix > > On 10/12/05, felix winkelmann <[EMAIL PROTECTED]> wrote: > > The code for big_random looks ok, could this be related > > to expt? (does the error also appear when expt is not involved?) > > > > > > cheers, > > felix > > > > > > On 10/12/05, Alex Shinn <[EMAIL PROTECTED]> wrote: > > > At Wed, 12 Oct 2005 07:35:36 +0200, felix winkelmann wrote: > > > > > > > > Hm... Works fine on this machine. I'll try it on another tonight. > > > > > > > > Can someone else reproduce this problem? > > > > > > I can: > > > > > > $ csi -R numbers -eval '(bitwise-and (random (expt 2 64)) (- (expt 2 64) > > > 1))' > > > *** glibc detected *** double free or corruption (fasttop): 0x080a7c08 *** > > > Aborted > > > > > > $ csi -v|grep Version > > > Version 2, Build 2 - linux-unix-gnu-x86 - [ dload ] > > > > > > $ uname -a > > > Linux strelka 2.6.6 #5 SMP Wed Jun 30 18:38:16 JST 2004 i686 GNU/Linux > > > > > > GMP version 4.1.4-6. > > > > > > -- > > > Alex > > > > > _______________________________________________ Chicken-users mailing list Chicken-users@nongnu.org http://lists.nongnu.org/mailman/listinfo/chicken-users