summaryrefslogtreecommitdiff
path: root/src/scheme/ao_scheme_cons.c
diff options
context:
space:
mode:
authorBdale Garbee <bdale@gag.com>2017-12-11 10:16:24 -0700
committerBdale Garbee <bdale@gag.com>2017-12-11 10:16:24 -0700
commitd1d98e408311c5ba18138a18f4c88448e4254626 (patch)
treeccf9c77fdf355f51911cc77b0dcf5a241d39f77e /src/scheme/ao_scheme_cons.c
parent2f8fce1cf6ce4bd12a836cc8ee15f4edbc95c95e (diff)
parentabb856cd66e00d739e4efb1930b5c168eaf48029 (diff)
Merge branch 'master' of ssh://git.gag.com/scm/git/fw/altos
Diffstat (limited to 'src/scheme/ao_scheme_cons.c')
-rw-r--r--src/scheme/ao_scheme_cons.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scheme/ao_scheme_cons.c b/src/scheme/ao_scheme_cons.c
index 03dad956..21ee10cc 100644
--- a/src/scheme/ao_scheme_cons.c
+++ b/src/scheme/ao_scheme_cons.c
@@ -195,7 +195,7 @@ ao_scheme_cons_length(struct ao_scheme_cons *cons)
int len = 0;
while (cons) {
len++;
- cons = ao_scheme_poly_cons(cons->cdr);
+ cons = ao_scheme_cons_cdr(cons);
}
return len;
}