From ab6b56dfe916c17f34e684e69483895402783ae5 Mon Sep 17 00:00:00 2001 From: Bad Diode Date: Sat, 9 Oct 2021 20:23:52 +0200 Subject: Add proc_display and fix some bugs --- src/bootstrap/objects.c | 17 ----------------- 1 file changed, 17 deletions(-) (limited to 'src/bootstrap/objects.c') diff --git a/src/bootstrap/objects.c b/src/bootstrap/objects.c index 985709a..14ff50d 100644 --- a/src/bootstrap/objects.c +++ b/src/bootstrap/objects.c @@ -137,20 +137,3 @@ symbol_eq(Object *a, Object *b) { } return true; } - -void display(Object *root); - -void -display_pair(Object *root) { - display(root->car); - if (root->cdr->type == OBJ_TYPE_PAIR) { - printf(" "); - display_pair(root->cdr); - } else if (root->cdr->type == OBJ_TYPE_NIL) { - return; - } else { - printf(" . "); - display(root->cdr); - } -} - -- cgit v1.2.1