bug in continuations.c

[bernard URBAN]

The following causes a crash when using continuations for
simulating a threaded application:

RCS file: /cvs/guile/guile-core/libguile/continuations.c,v
retrieving revision 1.28
diff -c -r1.28 continuations.c
*** continuations.c     2000/12/08 17:32:56     1.28
--- continuations.c     2000/12/20 13:37:59
***************
*** 231,237 ****
      }
    
    scm_dowinds (continuation->dynenv,
!              scm_ilength (scm_dynwinds) - continuation->dynenv);
    
    scm_dynthrow (cont, scm_values (args));
    return SCM_UNSPECIFIED; /* not reached */
--- 231,237 ----
      }
    
    scm_dowinds (continuation->dynenv,
!              scm_ilength (scm_dynwinds) - scm_ilength (continuation->dynenv));
    
    scm_dynthrow (cont, scm_values (args));
    return SCM_UNSPECIFIED; /* not reached */


-- 

Bernard Urban