On Mon, 2013-04-01 at 13:35 +0800, Daniel Hartwig wrote: > 2013/4/1 Nala Ginrut <nalagin...@gmail.com>: > > Anyway, string-join is so slowly beyond my expectation. > > Also note that ‘string-concatenate’ (less general than ‘string-join’) > performs better for the same case, you could use that directly instead > of my prior suggestion for similar results. Especially since you do > not desire the additional delimiter handling of ‘string-join’. >
hmm...seems not... --------------------------cut------------------------------ scheme@(guile-user)> (define a (make-list 1000000 "asdfadsfadsf")) scheme@(guile-user)> ,time (define b (apply string-concatenate a)) While executing meta-command: ERROR: Throw to key `vm-error' with args `(vm-run "VM: Stack overflow" ())'. scheme@(guile-user)> ,time (define b (apply string-concatenate (make-list 100000 "sadfadsfaf")) ... ) Aborted --------------------------end------------------------------
