aboutsummaryrefslogtreecommitdiff
path: root/guile_type_helpers.c
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@hornquist.se>2019-03-02 17:47:41 +0100
committerHugo Hörnquist <hugo@hornquist.se>2019-03-02 17:47:41 +0100
commit09140f93c7ce77eee24b1078425f5933acf75d7c (patch)
tree95ab6ff81bbb48e823bcccdd2b3cc35544b31b65 /guile_type_helpers.c
parentFix setters for date types. (diff)
downloadcalp-09140f93c7ce77eee24b1078425f5933acf75d7c.tar.gz
calp-09140f93c7ce77eee24b1078425f5933acf75d7c.tar.xz
Fix lingering strbuf off by one error.
Diffstat (limited to '')
-rw-r--r--guile_type_helpers.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/guile_type_helpers.c b/guile_type_helpers.c
index 5c7090ec..ae433b01 100644
--- a/guile_type_helpers.c
+++ b/guile_type_helpers.c
@@ -5,7 +5,7 @@
SCM scm_from_strbuf(strbuf* s) {
if (s->scm == NULL) {
- s->scm = scm_from_utf8_stringn (s->mem, s->len - 1);
+ s->scm = scm_from_utf8_stringn (s->mem, s->len);
scm_gc_protect_object(s->scm);
}