GNU bug report logs -
#17212
tests/utils.scm failures on Debian Wheezy i686 with Guile 2.0.5
Previous Next
Reported by: Mark H Weaver <mhw <at> netris.org>
Date: Mon, 7 Apr 2014 00:04:01 UTC
Severity: normal
Done: ludo <at> gnu.org (Ludovic Courtès)
Bug is archived. No further changes may be made.
Full log
View this message in rfc822 format
[Message part 1 (text/plain, inline)]
Your message dated Mon, 07 Apr 2014 18:18:57 +0200
with message-id <871tx9t8ni.fsf <at> gnu.org>
and subject line Re: bug#17212: tests/utils.scm failures on Debian Wheezy i686 with Guile 2.0.5
has caused the debbugs.gnu.org bug report #17212,
regarding tests/utils.scm failures on Debian Wheezy i686 with Guile 2.0.5
to be marked as done.
(If you believe you have received this mail in error, please contact
help-debbugs <at> gnu.org.)
--
17212: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=17212
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
I see two 'fcntl-lock' related failures with current master on an i686
Debian Wheezy system with Debian's Guile 2.0.5 package. See below for
the relevant excerpts from utils.log.
Mark
--8<---------------cut here---------------start------------->8---
Test begin:
test-name: "fcntl-flock wait"
source-file: "tests/utils.scm"
source-line: 177
source-form: (test-equal "fcntl-flock wait" 42 (let ((file (open-file temp-file "w0"))) (fcntl-flock file (quote write-lock)) (match (primitive-fork) (0 (dynamic-wind (const #t) (lambda () (let ((file (open-file temp-file "r"))) (fcntl-flock file (quote read-lock)) (primitive-exit (read file))) (primitive-exit 1)) (lambda () (primitive-exit 2)))) (pid (display "hello, world!" file) (force-output file) (sleep 1) (seek file 0 SEEK_SET) (truncate-file file 0) (write 42 file) (force-output file) (fcntl-flock file (quote unlock)) (match (waitpid pid) ((_ . status) (let ((result (status:exit-val status))) (close-port file) result)))))))
Test end:
result-kind: fail
actual-value: 2
expected-value: 42
--8<---------------cut here---------------end--------------->8---
--8<---------------cut here---------------start------------->8---
Test begin:
test-name: "fcntl-flock non-blocking"
source-file: "tests/utils.scm"
source-line: 216
source-form: (test-equal "fcntl-flock non-blocking" EAGAIN (match (pipe) ((input . output) (match (primitive-fork) (0 (dynamic-wind (const #t) (lambda () (close-port output) (read-char input) (let ((file (open-file temp-file "w"))) (catch (quote flock-error) (lambda () (fcntl-flock file (quote write-lock) #:wait? #f)) (lambda (key errno) (primitive-exit errno)))) (primitive-exit -1)) (lambda () (primitive-exit -2)))) (pid (close-port input) (let ((file (open-file temp-file "w"))) (fcntl-flock file (quote write-lock)) (write (quote green-light) output) (force-output output) (match (waitpid pid) ((_ . status) (let ((result (status:exit-val status))) (fcntl-flock file (quote unlock)) (close-port file) result)))))))))
t) (lambda () (close-port output) (read-char input) (let ((file (open-file temp-file "w"))) (catch (quote flock-error) (lambda () (fcntl-flock file (quote write-lock) #:wait? #f)) (lambda (key errno) (primitive-exit errno)))) (primitive-exit -1)) (lambda () (primitive-exit -2)))) (pid (close-port input) (let ((file (open-file temp-file "w"))) (fcntl-flock file (quote write-lock)) (write (quote green-light) output) (force-output output) (match (waitpid pid) ((_ . status) (let ((result (status:exit-val status))) (fcntl-flock file (quote unlock)) (close-port file) result)))))))))
Test end:
result-kind: fail
actual-value: 0
expected-value: 11
--8<---------------cut here---------------end--------------->8---
[Message part 3 (message/rfc822, inline)]
Mark H Weaver <mhw <at> netris.org> skribis:
> I see two 'fcntl-lock' related failures with current master on an i686
> Debian Wheezy system with Debian's Guile 2.0.5 package. See below for
> the relevant excerpts from utils.log.
I believe this is fixed with commits 68ec045 and af4535c (tested with
Guile 2.0.5 and Debian’s EGLIBC 2.11.3-4 on x86_64.)
Can you confirm?
Thanks,
Ludo’.
This bug report was last modified 11 years and 108 days ago.
Previous Next
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.