Re: Problem using poule, zero? error in scsh-process

On Fri, May 2, 2025 at 3:27 AM Peter Bex via Chicken-users <
[email protected]> wrote:

> On Fri, May 02, 2025 at 07:12:22AM +0000, Pietro Cerutti wrote:
> > > On 2 May 2025, at 08:53, Peter Bex via Chicken-users <
> [email protected]> wrote:
> > >> scsh-process substitutes (process-wait) with its own implementation:
> > >> https://api.call-cc.org/5/doc/scsh-process#sec:Process_reaping
> > >>
> https://code.more-magic.net/scsh-process/tree/scsh-process.scm?h=chicken-5#n125
> > >
> > > It doesn't set! it, it just exports an identifier by the same name.
> >
> > Uhm what am I misinterpreting here?
> >
> https://code.more-magic.net/scsh-process/tree/scsh-process.scm?h=chicken-5#n195
>
> D'oh!  It does actually set! it.  I probably missed it because I was
> thinking of the CHICKEN 6 implementation, which doesn't.  Fix should
> for C5 should hit soon, as version 1.6.1.
>
> Matt: please upgrade scsh-process to 1.6.1 (or latest chicken-5 from git)
> and see if that fixes it.
>

It gets further but there is a further similar looking issue:

*ck53 chicken-status | grep scsh*
scsh-process ................................................ version: 1.6.1

*ck53 csi test2.scm *
CHICKEN
(c) 2008-2021, The CHICKEN Team
(c) 2000-2007, Felix L. Winkelmann
Version 5.3.0 (rev e31bbee5)
linux-unix-gnu-x86-64 [ 64bit dload ptables ]

Type ,? for help.
; loading /home/matt/.csirc ...
; loading /home/matt/data/buildall/ck5.3_23WW01/lib/chicken/11/
chicken.load.import.so ...
; loading /home/matt/data/buildall/ck5.3_23WW01/lib/chicken/11/
chicken.format.import.so ...
; loading /home/matt/data/buildall/ck5.3_23WW01/lib/chicken/11/
chicken.process-context.import.so ...
; loading /home/matt/data/buildall/ck5.3_23WW01/lib/chicken/11/
chicken.process.signal.import.so ...
; loading /home/matt/data/buildall/ck5.3_23WW01/lib/chicken/11/
breadline.import.so ...
; loading /home/matt/data/buildall/ck5.3_23WW01/lib/chicken/11/
breadline-scheme-completion.import.so ...

Note: re-importing already imported identifier: assoc

Note: re-importing already imported identifier: member

Error: call of non-procedure: #f

Call history:

scsh-process.scm:155: k150
scsh-process.scm:155: g153
scsh-process.scm:131: scheme#values
scsh-process.scm:127: ##sys#call-with-values
scsh-process.scm:127: wait
scsh-process.scm:110: llrb-fixnum-table#table-ref/default
scsh-process.scm:155: scheme#call-with-current-continuation
scsh-process.scm:155: chicken.condition#with-exception-handler
scsh-process.scm:155: ##sys#call-with-values
scsh-process.scm:162: ##sys#call-with-values
scsh-process.scm:163: posix-process-wait
scsh-process.scm:229: srfi-18#thread-resume!
scsh-process.scm:181: pending-before
scsh-process.scm:155: k150
scsh-process.scm:155: g153
scsh-process.scm:160: chicken.condition#abort   <--
==================
*cat test2.scm *
(import (poule) (scheme) (chicken base) (srfi-1))

(import scsh-process)

(let* ((p (poule-create (cut expt 2 <>) 10))
       (j (list-tabulate 50 (cut poule-submit p <>)))
       (r (map (cut poule-result p <>) j))
       (_ (poule-destroy p)))
  (display r)
  (newline))
==================


>
> Many thanks to Pietro, I had totally missed that.
>
> Cheers,
> Peter
>
>