summaryrefslogtreecommitdiff
path: root/libguile/vectors.c
diff options
context:
space:
mode:
authorNeil Jerram <neil@ossau.uklinux.net>2002-01-22 23:31:39 +0000
committerNeil Jerram <neil@ossau.uklinux.net>2002-01-22 23:31:39 +0000
commitc96d76b88dcb7805311d14e6e408d064211fde20 (patch)
tree08d604bcf94ceb35dd271c4c46064ed60644f5b4 /libguile/vectors.c
parent229d2c9c076d214457f4f6817f7d3c1db90ed994 (diff)
downloadguile-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/vectors.c')
-rw-r--r--libguile/vectors.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/vectors.c b/libguile/vectors.c
index db9c18669..5868ba4f0 100644
--- a/libguile/vectors.c
+++ b/libguile/vectors.c
@@ -46,6 +46,7 @@
#include "libguile/eq.h"
#include "libguile/root.h"
#include "libguile/strings.h"
+#include "libguile/lang.h"
#include "libguile/validate.h"
#include "libguile/vectors.h"
@@ -101,7 +102,7 @@ SCM_DEFINE (scm_vector, "vector", 0, 0, 1,
SCM_VALIDATE_LIST_COPYLEN (1, l, i);
res = scm_c_make_vector (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);