diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-05-15 09:45:10 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-05-15 09:45:10 +0000 |
commit | 7c33806ae676601f902dbdc0f39c1f0828d68951 (patch) | |
tree | 30526d3249f03d715b5703227abdd263148053bc /libguile/strings.c | |
parent | 11bbab474a77ef0c190fd494db4ac81f5c8febdd (diff) | |
download | guile-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.c | 4 |
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 |