summaryrefslogtreecommitdiff
path: root/libguile/strings.c
diff options
context:
space:
mode:
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