summaryrefslogtreecommitdiff
path: root/libguile/strings.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-05-15 09:45:10 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-05-15 09:45:10 +0000
commit7c33806ae676601f902dbdc0f39c1f0828d68951 (patch)
tree30526d3249f03d715b5703227abdd263148053bc /libguile/strings.c
parent11bbab474a77ef0c190fd494db4ac81f5c8febdd (diff)
downloadguile-7c33806ae676601f902dbdc0f39c1f0828d68951.tar.gz
* Make SCM_DEBUG_CELL_ACCESSES=1 work with GUILE_DEBUG_FREELIST.
Diffstat (limited to 'libguile/strings.c')
-rw-r--r--libguile/strings.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/libguile/strings.c b/libguile/strings.c
index c4843ebf5..792b0f8af 100644
--- a/libguile/strings.c
+++ b/libguile/strings.c
@@ -48,7 +48,7 @@
#include "libguile/_scm.h"
#include "libguile/chars.h"
-
+#include "libguile/root.h"
#include "libguile/strings.h"
#include "libguile/validate.h"
@@ -437,6 +437,8 @@ SCM_DEFINE (scm_make_shared_substring, "make-shared-substring", 1, 2, 0,
void
scm_init_strings ()
{
+ scm_nullstr = scm_allocate_string (0);
+
#ifndef SCM_MAGIC_SNARFER
#include "libguile/strings.x"
#endif