mechanism for putting go types into 6.out symbol table.
no types yet.

R=ken
OCL=33142
CL=33146
diff --git a/src/cmd/6l/obj.c b/src/cmd/6l/obj.c
index b6e1a96..f3c12d7 100644
--- a/src/cmd/6l/obj.c
+++ b/src/cmd/6l/obj.c
@@ -607,6 +607,8 @@
 	}
 	if(t & T_TYPE)
 		a->type = Bgetc(f);
+	if(t & T_GOTYPE)
+		a->gotype = h[Bgetc(f)];
 	s = a->sym;
 	if(s == S)
 		return;
@@ -635,7 +637,7 @@
 void
 addlib(char *src, char *obj)
 {
-	char name[1024], pname[1024], comp[256], *p, *q;
+	char name[1024], pname[1024], comp[256], *p;
 	int i, search;
 
 	if(histfrogp <= 0)