[Gcl-devel] (no subject)

[bugnet]


From: address@hidden
To: address@hidden
Subject: GCL-TK OUR-WRITE BUG

Hello,

Anybody who knows about GCL-Tk, your help with this would greatly be 
appreciated...

After successfully mapping a window and filling it with widgets, I preform 
*many* widget calls, each of which specifies a :return argument (i.e., GCL 
waits for Tk to complete the call). However, when too many of these calls are 
made too quickly, I receive the following error:

| Error: Write timeout: ""
| Fast links are on: do (si::use-fast-links nil) for debugging
| Error signalled by FUNCALL.
| Backtrace: funcall > system:top-level > read > system:sigusr1-interrupt > 
lambda > funcall > funcall > foo-tip::bar-a > cond > block > tagbody > progn > 
foo-tip::re-frob > cond > eval > eval > cond > foo-mask::lin-apples > cond > 
foo-pez::lin-pear-muff > prog > setq > funcall > funcall > lambda-closure > 
funcall > funcall > lambda-closure > foo-mask::retarf > eval > eval > cond > 
cond > foo-mask::retarf > eval > eval > foo-mask::mul-frag > foo-tip::frag-mul 
> cond > foo-wheels::blab-apple-mode > foo-wheels::blab-apple > 
foo-wheels::blab-fizzer > foo-pez::lin-pear-muff > prog > setq > funcall > 
funcall > lambda-closure > funcall > funcall > lambda-closure > 
foo-wheels::blab-stone > mapcar > lambda-closure > cond > incf > 
foo-tip::frag-mul > cond > foo-wheels::blab-apple-mode > foo-wheels::blab-apple 
> foo-wheels::blab-fizzer > foo-pez::lin-pear-muff > prog > setq > funcall > 
funcall > lambda-closure > funcall > funcall > lambda-closure > 
foo-wheels::blab-stone > mapcar > lambda-closure > cond > incf > 
foo-tip::frag-mul > cond > foo-wheels::blab-apple-mode > foo-wheels::blab-apple 
> foo-wheels::blab-fizzer > foo-pez::lin-pear-muff > prog > setq > funcall > 
funcall > lambda-closure > funcall > funcall > lambda-closure > 
foo-wheels::blab-stone > mapcar > lambda-closure > cond > foo-tip::try-stone > 
cond > foo-wheels::trying-snarf > foo-wheels::blab-nice > mapcar > 
lambda-closure > foo-pez::lin-pear-muff > prog > setq > funcall > funcall > 
lambda-closure > mapcar > lambda-closure > funcall > funcall > SYSTEM:OUR-WRITE
| 
| Broken at FUNCALL.

This problem shows up on both I386 and PPC. This information has been submitted 
to the bug tracker at: 
http://savannah.gnu.org/bugs/index.php?func=detailitem&item_id=8424

If you have any ideas how I can fix this, please post or email me. In case it 
matters, this code does not redefine any of its code.

Thanks!