Re: Concurrent MVars for Guile

[David Thompson]

On 09/02/2013 03:55 AM, Mark H Weaver wrote:
> Hello all,
>
> I've attached a preliminary implementation of MVars à la Concurrent
> Haskell for Guile.  I made a few small changes to the API to better
> match Scheme conventions, and added atomicity guarantees for 'read-mvar'
> and 'swap-mvar'.  I also added the interface 'try-read-mvar'.
>
> Note that the fairness of this implementation relies upon the fairness
> of Guile's mutexes and condition variables, which I have not checked.
>
> Comments and suggestions welcome.
>
> I was thinking that maybe we should add something like this to core
> Guile.  What do you think?
>
>       Mark
I am using this for my game library, guile-2d (the first version that 
you posted). A user ran into trouble installing guile-2d because of an 
error with case-lambda in this module. They are using Guile 2.0.7.

Thoughts?

~/Downloads/guile-2d  $ make
  GEN2d/game-loop.go
ice-9/boot-9.scm:106:20:  In  procedure#<procedure 9f50900 at 
ice-9/boot-9.scm:97:6 (thrown-k . args)>:
ice-9/boot-9.scm:106:20:  Syntax  error:
2d/mvars.scm:52:2:  case-lambda:  badcase-lambda  in  form(case-lambda  "Return a 
freshly allocated mvar.  The optional argument, if provided,\nspecifies the initial 
contents of the mvar, otherwise it will be empty."  (()  (make-mvar#f #t 
(make-mutex) (make-condition-variable))) ((x) (make-var x #f (make-mutex) 
(make-condition-variable))))
make:  ***  [2d/game-loop.go]  Error  1