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

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

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

revision 1.23 by ttn, Thu Mar 14 03:47:43 2002 UTC revision 1.24 by mvo, Thu Oct 3 22:48:15 2002 UTC
# Line 1  Line 1 
1  /*      Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc.  /*      Copyright (C) 1995, 1996, 1997, 1998, 2000, 2002 Free Software Foundation, Inc.
2   *   *
3   * This program is free software; you can redistribute it and/or modify   * This program is free software; you can redistribute it and/or modify
4   * it under the terms of the GNU General Public License as published by   * it under the terms of the GNU General Public License as published by
# Line 101  with-new-thread was evaluated, but not i Line 101  with-new-thread was evaluated, but not i
101  All the evaluation rules for dynamic roots apply to threads.  All the evaluation rules for dynamic roots apply to threads.
102  */  */
103    
104    SCM_REGISTER_PROC(s_current_thread, "current-thread", 0, 0, 0, scm_current_thread);
105    SCM_REGISTER_PROC(s_all_thread, "all-threads", 0, 0, 0, scm_all_threads);
106    
107  SCM_REGISTER_PROC(s_join_thread, "join-thread", 1, 0, 0, scm_join_thread);  SCM_REGISTER_PROC(s_join_thread, "join-thread", 1, 0, 0, scm_join_thread);
108  /* Suspend execution of the calling thread until the target @var{thread}  /* Suspend execution of the calling thread until the target @var{thread}
109  terminates, unless the target @var{thread} has already terminated.  terminates, unless the target @var{thread} has already terminated.

Legend:
Removed from v.1.23  
changed lines
  Added in v.1.24

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