guile-modules/benchmarks lib.scm

guile-modules/benchmarks lib.scm

[cmm]

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'.

guile-modules/benchmarks lib.scm

[mdj]

CVSROOT:	/cvs/guile
Module name:	guile-modules
Changes by:	mdj@egcs.cygnus.com	99/09/14 18:12:24

Modified files:
	benchmarks     : lib.scm 

Log message:
	* lib.scm (save-options, time-in-evaluator, optarg1): New macros.
	(times:format): Added total time.  (This time is actually most
	interesting since it is what finally counts.)
	(times:user, times:gc, times:systen, times:total): New selectors.
	(last-data): New procedure: Return last logged data.
	(time-thunk-median): New procedure: Run five trials and select the
	median.  This filters out outliers caused by temporary
	disturbances and helps select a typical sample.  Since the result
	is displayed for each trial, you also get an intuition for the
	variance.
	(time-thunk-once, time-thunk-median, time-thunk-repeated,
	time-accumulate): Take extra optional argument EVALUATOR.  If
	`debug', use the debugging evaluator.  Default is the normal.