From mboxrd@z Thu Jan  1 00:00:00 1970
From: cmm@sourceware.cygnus.com
To: guile-cvs@sourceware.cygnus.com
Subject: guile-modules/benchmarks lib.scm
Date: Tue, 15 Aug 2000 18:13:00 -0000
Message-id: <20000816011355.29185.qmail@sourceware.cygnus.com>
X-SW-Source: 2000-q3/msg00147.html
List-Id: <guile-cvs.sourceware.org>

CVSROOT:	/cvs/guile
Module name:	guile-modules
Changes by:	cmm@sourceware.cygnus.com	2000-08-15 18:13:55

Modified files:
	benchmarks     : lib.scm 

Log message:
	* lib.scm (*benchmark-obscure-gc-stuff*): exported variable.  set
	it to true if you tweak GC.
	(times:gc-mark, times:gc-sweep, times:cells-marked,
	times:cells-swept): new selectors.
	(general) reorganized times to be an alist -- it's more
	extendable.
	(times:now): return more stats.
	(times:format): print more things if *benchmark-obscure-gc-stuff*
	is true.  slightly reorganized.
	(map-cdrs): new procedure, like `map' but expects an alist and
	maps its function argument over cdrs.
	(times:elapsed, times:add): use `map-cdrs'.