Arrange so that `SCM_I_CURRENT_THREAD' is not accessed outside of libguile.
authorLudovic Courtès <ludo@gnu.org>
Fri, 2 Oct 2009 13:28:29 +0000 (15:28 +0200)
committerLudovic Courtès <ludo@gnu.org>
Fri, 9 Oct 2009 12:10:03 +0000 (14:10 +0200)
commit46935a1fac58e50276f7e7e49e5fa6bab53c0848
tree61a07bfd49251b8b0a7798c490f15f0beef4d552
parentb8ec9daba60ceb14b443d3a44ab5043edcb474df
Arrange so that `SCM_I_CURRENT_THREAD' is not accessed outside of libguile.

* libguile/__scm.h (scm_async_tick): New declaration.
  (SCM_ASYNC_TICK)[!BUILDING_LIBGUILE]: Use `scm_async_tick ()'.

* libguile/async.c (scm_critical_section_start,
  scm_critical_section_end, scm_async_tick): New functions.

* libguile/async.h (scm_i_critical_section_mutex): Made internal.
  (scm_critical_section_start, scm_critical_section_end): New
  declarations.
  (SCM_CRITICAL_SECTION_START,
  SCM_CRITICAL_SECTION_END)[!BUILDING_LIBGUILE]: Use the same-named
  function (lower-case).

* libguile/stackchk.h (SCM_STACK_OVERFLOW_P): Conditionalize on
  `BUILDING_LIBGUILE'.

* libguile/threads.h (SCM_I_CURRENT_THREAD, scm_i_dynwinds,
  scm_i_set_dynwinds, scm_i_last_debug_frame,
  scm_i_set_last_debug_frame): Conditionalize on `BUILDING_LIBGUILE'.
libguile/__scm.h
libguile/async.c
libguile/async.h
libguile/stackchk.h
libguile/threads.h