mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

Move SCM_TICK definition to __scm.h.

Browse source 
* libguile/__scm.h:
* libguile/async.h (SCM_TICK): Move here.
This commit is contained in:
Andy Wingo 2018-06-20 15:10:29 +02:00
parent 6a9f73fb8f
commit 716d9aaf32
2 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/__scm.h
View file

@ -321,10 +321,6 @@ typedef long SCM_STACKITEM;
#define SCM_STACK_PTR(ptr) ((SCM_STACKITEM *) (void *) (ptr))
#define SCM_TICK scm_async_tick ()
#ifndef SCM_MAGIC_SNARFER
/* Let these macros pass through if
we are snarfing; thus we can tell the

4
libguile/async.h
View file

@ -27,6 +27,10 @@
#define SCM_TICK scm_async_tick ()
SCM_API void scm_async_tick (void);
SCM_API void scm_switch (void);
SCM_API SCM scm_system_async_mark (SCM a);