~ chicken-core (chicken-5) 5d2b4fadd0913c03b6fd457fd38d63f501f48fc8
commit 5d2b4fadd0913c03b6fd457fd38d63f501f48fc8
Author: Christian Kellermann <ckeen@pestilenz.org>
AuthorDate: Thu Dec 12 05:29:13 2013 -0500
Commit: Christian Kellermann <ckeen@pestilenz.org>
CommitDate: Thu Dec 12 11:36:06 2013 +0100
Fix #1081 by explicitly setting the interval to 0 in setitimer.
diff --git a/tests/srfi-18-signal-test.scm b/tests/srfi-18-signal-test.scm
index c1a47924..46b7dd20 100644
--- a/tests/srfi-18-signal-test.scm
+++ b/tests/srfi-18-signal-test.scm
@@ -29,6 +29,8 @@
"struct itimerval timer;"
"timer.it_value.tv_sec = 1;"
"timer.it_value.tv_usec = 0;"
+ "timer.it_interval.tv_sec = 0;"
+ "timer.it_interval.tv_usec = 0;"
"setitimer(ITIMER_REAL, &timer, NULL);\n"
"#endif"))
Trap