← Back to branch summary

~peter-pearse/ubuntu/natty/guile-1.8/prop001

« back to all changes in this revision

Viewing changes to libguile/async.c

  • Committer: Bazaar Package Importer
  • Author(s): أحمد المحمودي (Ahmed El-Mahmoudy)
  • Date: 2009-07-20 19:39:17 UTC
  • mfrom: (1.2.6 upstream)
  • Revision ID: james.westby@ubuntu.com-20090720193917-s0985l9wxihwoscl
Tags: 1.8.7+1-1ubuntu1
https://launchpad.net/bugs/401816
* Merge from Debian unstable, remaining changes: (LP: #401816)
  - Build with -Wno-error.
  - Build with thread support. Some guile-using programs like autogen need it.
  - Add debian/guile-1.8-libs.shlibs: Thread support breaks ABI, bump the soname.

Show diffs side-by-side

added added

removed removed

Lines of Context:
libguile/async.c
152
152
     invoked even when pending_asyncs is zero.
153
153
  */
154
154
 
155
 
  scm_i_scm_pthread_mutex_lock (&async_mutex);
 
155
  scm_i_pthread_mutex_lock (&async_mutex);
156
156
  t->pending_asyncs = 0;
157
157
  if (t->block_asyncs == 0)
158
158
    {
177
177
SCM_DEFINE (scm_system_async, "system-async", 1, 0, 0,
178
178
            (SCM thunk),
179
179
            "This function is deprecated.  You can use @var{thunk} directly\n"
180
 
            "instead of explicitely creating an async object.\n")
 
180
            "instead of explicitly creating an async object.\n")
181
181
#define FUNC_NAME s_scm_system_async
182
182
{
183
183
  scm_c_issue_deprecation_warning 
197
197
  int sleep_fd;
198
198
  SCM p;
199
199
  
200
 
  scm_i_scm_pthread_mutex_lock (&async_mutex);
 
200
  scm_i_pthread_mutex_lock (&async_mutex);
201
201
  p = t->active_asyncs;
202
202
  SCM_SETCDR (c, SCM_EOL);
203
203
  if (!scm_is_pair (p))
263
263
{
264
264
  int pending;
265
265
 
266
 
  scm_i_scm_pthread_mutex_lock (&async_mutex);
 
266
  scm_i_pthread_mutex_lock (&async_mutex);
267
267
  pending = t->pending_asyncs;
268
268
  if (!pending)
269
269
    {
278
278
void
279
279
scm_i_reset_sleep (scm_i_thread *t)
280
280
{
281
 
  scm_i_scm_pthread_mutex_lock (&async_mutex);
 
281
  scm_i_pthread_mutex_lock (&async_mutex);
282
282
  t->sleep_object = SCM_BOOL_F;
283
283
  t->sleep_mutex = NULL;
284
284
  t->sleep_fd = -1;