sjs/lake
1
0
Fork 0
mirror of https://github.com/samsonjs/lake.git synced 2026-03-25 08:55:49 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

handle an edge case in dlist_repr

Browse source
This commit is contained in:
Sami Samhuri 2011-04-23 20:01:03 -07:00
parent d7bb151ce8
commit 3661142383
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/dlist.c
View file

@ -31,13 +31,18 @@ char *dlist_repr(LakeDottedList *dlist)
GString *s = g_string_new("(");
int i;
char *s2;
if (dlist->head) {
if (dlist->head && LIST_N(dlist->head)) {
for (i = 0; i < LIST_N(dlist->head); ++i) {
s2 = lake_repr(LIST_VAL(dlist->head, i));
g_string_append(s, s2);
g_free(s2);
if (i != LIST_N(dlist->head) - 1) g_string_append(s, " ");
}
}
else if (dlist->head) {
s2 = lake_repr(VAL(dlist->head));
g_string_append(s, s2);
g_free(s2);
}
g_string_append(s, " . ");
s2 = lake_repr(dlist->tail);