diff options
Diffstat (limited to 'src/guile_type_helpers.c')
| -rw-r--r-- | src/guile_type_helpers.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/src/guile_type_helpers.c b/src/guile_type_helpers.c index 072ddff9..2864df0d 100644 --- a/src/guile_type_helpers.c +++ b/src/guile_type_helpers.c @@ -3,13 +3,9 @@ #include "macro.h" SCM scm_from_strbuf(strbuf* s) { - // if (s->scm == NULL) { - SCM ret = scm_from_utf8_stringn (s->mem, s->len); - scm_gc_protect_object(ret); - // } - - // return s->scm; - return ret; + SCM ret = scm_from_utf8_stringn (s->mem, s->len); + scm_gc_protect_object(ret); + return ret; } SCM scm_from_strbuf_symbol(strbuf* s) { |