Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-21 22:59:16 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Removing debug code not meant for commit.

Browse source
This commit is contained in:
Alex Shinn 2012-05-19 07:54:07 +09:00
parent a979e6ffcf
commit 057f6b2dea
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/srfi/18/threads.c
View file

@ -546,7 +546,7 @@ sexp sexp_scheduler (sexp ctx, sexp self, sexp_sint_t n, sexp root_thread) {
if ((sexp_context_timeval(res).tv_sec == 0) if ((sexp_context_timeval(res).tv_sec == 0)
&& (sexp_context_timeval(res).tv_usec == 0)) { && (sexp_context_timeval(res).tv_usec == 0)) {
/* no timeout, wait for default 10ms */ /* no timeout, wait for default 10ms */
usecs = 10*1000 *100; /* 1s */ usecs = 10*1000;
} else { } else {
/* wait until the next timeout */ /* wait until the next timeout */
gettimeofday(&tval, NULL); gettimeofday(&tval, NULL);