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

* Use SCM_CONSP, not SCM_ECONSP.

Browse source
This commit is contained in:
Dirk Herrmann 2001-07-30 18:25:14 +00:00
parent 54866b6c20
commit 6cf695375f
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/ChangeLog
View file

@ -1,3 +1,7 @@
2001-07-30 Dirk Herrmann <D.Herrmann@tu-bs.de>
* pairs.h (SCM_VALIDATE_PAIR): Use SCM_CONSP, not SCM_ECONSP.
2001-07-29 Marius Vollmer <mvo@zagadka.ping.de>
Removed vcell slot from structs.

2
libguile/pairs.h
View file

@ -53,7 +53,7 @@
#if (SCM_DEBUG_PAIR_ACCESSES == 1)
# include "libguile/struct.h"
# define SCM_VALIDATE_PAIR(cell, expr) \
((!SCM_ECONSP (cell) ? scm_error_pair_access (cell), 0 : 0), (expr))
((!SCM_CONSP (cell) ? scm_error_pair_access (cell), 0 : 0), (expr))
#else
# define SCM_VALIDATE_PAIR(cell, expr) (expr)
#endif