From 0f548538dcbfaeb063f468e394751a5c3d882295 Mon Sep 17 00:00:00 2001
From: "Eric S. Raymond" <esr@thyrsus.com>
Date: Fri, 11 Nov 1994 11:27:04 +0000
Subject: [PATCH] Better jump label display.

---
 interpret.c | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/interpret.c b/interpret.c
index 784af46..3cecda6 100644
--- a/interpret.c
+++ b/interpret.c
@@ -43,8 +43,13 @@ static void prettyprint(node *tree, int indent)
     else if (tree->type == STRING)
 	(void) printf("STRING: '%s'\n", tree->u.string);
     else if (tree->type == STATEMENT && indent > 0)
-	(void) printf("-> %s (STATEMENT %d)\n", 
-		      tree->car->car->u.string, tree->number);
+    {
+	if (tree->car->type == LABEL)
+	    (void) printf("-> %s (STATEMENT %d)\n", 
+			  tree->car->car->u.string, tree->number);
+	else
+	    (void) printf("-> STATEMENT %d\n", tree->number);
+    }
     else
     {
 	if (tree->type == STATEMENT)
-- 
2.43.0