> > (use srfi-1) > > (define hash (make-hash-table)) > > (for-each (lambda (n) (hash-table-set! hash hash n)) (iota 1000000))
Erm, I meant (for-each (lambda (n) (hash-table-set! hash n #f)) (iota 1000000)) , of course. Alejo. http://azul.freaks-unidos.net/ ---=( Comunidad de Usuarios de Software Libre en Colombia )=--- ---=( http://bachue.com/colibri )=--=( [EMAIL PROTECTED] )=---
signature.asc
Description: Digital signature
_______________________________________________ Chicken-users mailing list [email protected] http://lists.nongnu.org/mailman/listinfo/chicken-users
