From: ceriel <none@none>
Date: Wed, 20 May 1992 10:57:42 +0000 (+0000)
Subject: Corrected problem in reading symbol table: t14=15, t15=16 did not work properly
X-Git-Tag: release-5-5~472
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=2cb19d3a309dc8be200609c748aa572e5d385458;p=ack.git

Corrected problem in reading symbol table: t14=15, t15=16 did not work properly
---

diff --git a/util/grind/db_symtab.g b/util/grind/db_symtab.g
index d39801ddd..25989e0fe 100644
--- a/util/grind/db_symtab.g
+++ b/util/grind/db_symtab.g
@@ -263,6 +263,9 @@ type_name(p_type *t; p_symbol sy;)
 	'='			
 	type(p, type_index, sy)
   |
+				{ if (*t && ! *p) *p = *t; 
+				  else if (*t) **t = **p;
+				}
   ]
 				{ if (*p == 0) *p = new_type();
 				  *t = *p;
diff --git a/util/grind/type.c b/util/grind/type.c
index 8b08cc86e..9120f7553 100644
--- a/util/grind/type.c
+++ b/util/grind/type.c
@@ -327,7 +327,7 @@ clean_tp_tab()
 				p_type p = list_row[i].row[j/NINCR][j%NINCR];
 				if (p && p->ty_class == 0) {
 					error("%s: incomplete type (%d,%d)",
-					      listfile->sy_idf->id_text,
+					      FileScope->sc_definedby->sy_idf->id_text,
 					      i,
 					      j);
 				}