From: Eric S. Raymond <esr@thyrsus.com>
Date: Fri, 11 Nov 1994 21:38:47 +0000 (+0000)
Subject: Get better feedback.
X-Git-Tag: 1-2~29
X-Git-Url: http://thyrsus.com/gitweb/?a=commitdiff_plain;h=11eb05c6ff9e7da8361e7cf9a8a67a8662456c62;p=cupl.git

Get better feedback.
---

diff --git a/interpret.c b/interpret.c
index 1f24213..ecde385 100644
--- a/interpret.c
+++ b/interpret.c
@@ -185,7 +185,7 @@ static bool check_errors(node *tree)
     /* check for label/variable consistency */
     for_symbols(lp)
 	if ((lp->blabelref || lp->blabeldef) + (lp->slabelref || lp->slabeldef) + (lp->assigned || lp->used) > 1)
-	    die("%s has conflicting uses\n");
+	    die("%s has conflicting uses\n", lp->node->u.string);
 	else if (lp->blabelref && !lp->blabeldef)
 	    die("block label %s used but not defined\n", lp->node->u.string);
 	else if (!lp->blabelref && lp->blabeldef)