/[guile]/guile/guile-core/libguile/coop.c
ViewVC logotype

Diff of /guile/guile-core/libguile/coop.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.30 by hanwen, Fri Aug 16 22:01:09 2002 UTC revision 1.31 by ghouston, Sat Aug 17 20:39:35 2002 UTC
# Line 620  coop_create (coop_userf_t *f, void *pu) Line 620  coop_create (coop_userf_t *f, void *pu)
620    else    else
621  #endif  #endif
622      {      {
623        t = scm_malloc (sizeof (coop_t), "coop");        t = scm_malloc (sizeof (coop_t));
   
624        t->specific = NULL;        t->specific = NULL;
625        t->n_keys = 0;        t->n_keys = 0;
626  #ifdef GUILE_PTHREAD_COMPAT  #ifdef GUILE_PTHREAD_COMPAT

Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26