mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

* eval.c: remove commented code, remove #ifdef CCLO conditionals

Browse source 
* remove uses of older GC marking and cell accessing macros
This commit is contained in:
Dirk Herrmann 2000-12-06 15:16:59 +00:00
parent e34f941a3a
commit fd3363659b
11 changed files with 51 additions and 109 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/async.c
View file

@ -116,7 +116,7 @@ static long tc16_async;
/* cmm: this has SCM_ prefix because SCM_MAKE_VALIDATE expects it.
this is ugly. */
#define SCM_ASYNCP(X) (SCM_NIMP(X) && (tc16_async == SCM_GCTYP16 (X)))
#define SCM_ASYNCP(X) (SCM_NIMP(X) && (tc16_async == SCM_TYP16 (X)))
#define VALIDATE_ASYNC(pos,a) SCM_MAKE_VALIDATE(pos, a, ASYNCP)