diff options
Diffstat (limited to '')
-rw-r--r-- | src/guile_type_helpers.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/guile_type_helpers.c b/src/guile_type_helpers.c index e231f2b1..0353a88a 100644 --- a/src/guile_type_helpers.c +++ b/src/guile_type_helpers.c @@ -11,3 +11,7 @@ SCM scm_from_strbuf(strbuf* s) { return s->scm; } + +SCM scm_from_strbuf_symbol(strbuf* s) { + return scm_string_to_symbol(scm_from_strbuf(s)); +} |