diff options
author | Neil Jerram <neil@ossau.uklinux.net> | 2002-01-22 23:31:39 +0000 |
---|---|---|
committer | Neil Jerram <neil@ossau.uklinux.net> | 2002-01-22 23:31:39 +0000 |
commit | c96d76b88dcb7805311d14e6e408d064211fde20 (patch) | |
tree | 08d604bcf94ceb35dd271c4c46064ed60644f5b4 /libguile/weaks.c | |
parent | 229d2c9c076d214457f4f6817f7d3c1db90ed994 (diff) | |
download | guile-c96d76b88dcb7805311d14e6e408d064211fde20.tar.gz |
* First batch of libguile changes for Elisp support.
* Fixed a few typos.
* Minor rationalization of macros relating to source breakpoints.
Diffstat (limited to 'libguile/weaks.c')
-rw-r--r-- | libguile/weaks.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/weaks.c b/libguile/weaks.c index 277b102b3..d5fc5a060 100644 --- a/libguile/weaks.c +++ b/libguile/weaks.c @@ -44,6 +44,7 @@ #include "libguile/_scm.h" #include "libguile/vectors.h" +#include "libguile/lang.h" #include "libguile/validate.h" #include "libguile/weaks.h" @@ -144,7 +145,7 @@ SCM_DEFINE (scm_weak_vector, "weak-vector", 0, 0, 1, res = scm_make_weak_vector (SCM_MAKINUM (i), SCM_UNSPECIFIED); data = SCM_VELTS (res); - while (!SCM_NULLP (l)) + while (!SCM_NULL_OR_NIL_P (l)) { *data++ = SCM_CAR (l); l = SCM_CDR (l); |