[pkg-s48-maint] Bug#348352: scheme48: WAIT-FOR-CHILD eats 100% CPU

[Andreas Rottmann]

Package: scheme48
Version: 1.3-4
Severity: normal


I have already reported this upstream, see 
http://article.gmane.org/gmane.lisp.scheme.scheme48/1643. That mail
includes a patch.

-------
 When running the following program in s48 1.3, it eats nearly 100% CPU. 
 An strace reveals that waitpid() calls using WNOHANG are made with a 
 very high rate - I fancy the scheme48 VM goes into a thight loop calling 
 waitpid().

  ;; ,open posix-processes
  (define (main args)
     (let ((id (fork)))
       (cond (id
              (wait-for-child-process id)
              (values (process-id-exit-status id)
                      (process-id-terminating-signal id)))
             (else
              (exec "sleep" "10")))))
-----

-- System Information:
Debian Release: testing/unstable
  APT prefers unstable
  APT policy: (500, 'unstable'), (1, 'experimental')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.8-2-386
Locale: LANG=C, LC_CTYPE=C (charmap=ANSI_X3.4-1968)

Versions of packages scheme48 depends on:
ii  libc6                         2.3.5-12   GNU C Library: Shared libraries an

scheme48 recommends no packages.

-- no debconf information