2009-09-19 Ivan Maidanski <ivmai@mail.ru>

2009-09-19  Ivan Maidanski <ivmai@mail.ru>
	(ivmai129.diff - superseding diff47)

	* alloc.c (GC_default_stop_func): New static variable (initialized
	to GC_never_stop_func).
	* alloc.c (GC_set_stop_func, GC_get_stop_func): New function.
	* alloc.c (GC_timeout_stop_func): Define as GC_default_stop_func
	(instead of GC_never_stop_func) if SMALL_CONFIG (or NO_CLOCK),
	else call GC_default_stop_func() before getting "current_time".
	* alloc.c (GC_maybe_gc): Expand GC_gcollect_inner() macro (for
	FIXME comment).
	* alloc.c (GC_maybe_gc, GC_collect_a_little_inner): add FIXME for
	replacing GC_never_stop_func with GC_default_stop_func (if
	possible).
	* alloc.c (GC_gcollect): Use GC_default_stop_func.
	* alloc.c (GC_collect_or_expand): Use GC_default_stop_func
	(instead of GC_never_stop_func) unless it is trigged due to out of
	memory; don't increment GC_fail_count and don't output warning
	(before trying to collect again) in case the collection has been
	interrupted (by GC_default_stop_func) and the heap expansion has
	failed too.
	* include/gc.h (GC_set_stop_func, GC_get_stop_func): New function
	prototypes.