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

1992-05-20 10:57:42 +00:00
parent 6def6e1bea
commit 2cb19d3a30
2 changed files with 4 additions and 1 deletions
--- 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;