diff options
author | Hugo Hörnquist <hugo@hornquist.se> | 2019-02-25 23:45:49 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-02-25 23:45:49 +0100 |
commit | b99692e7b9c66d0ae692fa4212471277a24251a2 (patch) | |
tree | a91dd7e3faf1ad55926d2afdc6ac6c1d69c0468c /guile_type_helpers.c | |
parent | Add scm field to strbuf. (diff) | |
download | calp-b99692e7b9c66d0ae692fa4212471277a24251a2.tar.gz calp-b99692e7b9c66d0ae692fa4212471277a24251a2.tar.xz |
Add GC guards.
Diffstat (limited to '')
-rw-r--r-- | guile_type_helpers.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/guile_type_helpers.c b/guile_type_helpers.c index 485827a0..74223bae 100644 --- a/guile_type_helpers.c +++ b/guile_type_helpers.c @@ -5,6 +5,7 @@ SCM scm_from_strbuf(strbuf* s) { if (s->scm == NULL) { s->scm = scm_from_utf8_stringn (s->mem, s->len - 1); + scm_gc_protect_object(s->scm); } return s->scm; |