diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-31 00:11:05 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2019-03-31 00:11:05 +0100 |
commit | ae630ed595330f102685bbbb96c01a8c24b8923a (patch) | |
tree | ee1162df4a3c2a181b9d48e5281c7f33e18eaeb5 /src/guile_interface.scm.c | |
parent | Cal name now set to basename of path. (diff) | |
download | calp-ae630ed595330f102685bbbb96c01a8c24b8923a.tar.gz calp-ae630ed595330f102685bbbb96c01a8c24b8923a.tar.xz |
Add cval field to LLIST.
Diffstat (limited to '')
-rw-r--r-- | src/guile_interface.scm.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/guile_interface.scm.c b/src/guile_interface.scm.c index a9485b38..9356533d 100644 --- a/src/guile_interface.scm.c +++ b/src/guile_interface.scm.c @@ -89,14 +89,14 @@ SCM_DEFINE (vcomponent_set_attr_x, "%vcomponent-set-attribute!", 3, 0, 0, * Otherwise we know that it's NULL and safe to write a new * SCM value there. */ - if (c->cur->value->key.scm != NULL) { - scm_gc_unprotect_object(c->cur->value->key.scm); + if (c->cval->key.scm != NULL) { + scm_gc_unprotect_object(c->cval->key.scm); } } free(key); - strbuf* target = &c->cur->value->key; + strbuf* target = &c->cval->key; target->scm = new_value; scm_gc_protect_object(target->scm); |