aboutsummaryrefslogtreecommitdiff
path: root/scheme.scm.c
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2019-02-05 23:17:08 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2019-02-05 23:17:08 +0100
commita514490dcbb4aaaca3a5e4fc71ef194fea18b37f (patch)
tree16b8c4923fafbbe9e6e43e88beff08eb3f0674ae /scheme.scm.c
parentAdd support for NL without preceeding CR. (diff)
downloadcalp-a514490dcbb4aaaca3a5e4fc71ef194fea18b37f.tar.gz
calp-a514490dcbb4aaaca3a5e4fc71ef194fea18b37f.tar.xz
Add llist FIRST & LAST, rewrote code to use them.
Diffstat (limited to 'scheme.scm.c')
-rw-r--r--scheme.scm.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/scheme.scm.c b/scheme.scm.c
index da8cd3f1..a7ddc27d 100644
--- a/scheme.scm.c
+++ b/scheme.scm.c
@@ -53,7 +53,7 @@ SCM_DEFINE (calendar_get_attr, "calendar-get-attr", 3, 0, 0,
// TODO actuall iterators
// TODO this reverses the list
- for ( LINK(strbuf)* n = c->vals.head->after;
+ for ( LINK(strbuf)* n = FIRST(&c->vals);
n->after != NULL;
n = n->after) {
llist = scm_cons(scm_from_strbuf(n->value), llist);