export

R=r
OCL=16018
CL=16022

src/cmd/6g/cgen.c

@@ -386,6 +386,9 @@ agen(Node *n, Node *res)
 		// i is in &n1
 		// w is width
 
+		if(w == 0)
+			fatal("index is zero width");
+
 		if(isptrdarray(nl->type)) {
 			regalloc(&n2, types[tptr], res);
 			gmove(res, &n2);

src/cmd/gc/export.c

@@ -506,14 +506,17 @@ importaddtyp(Node *ss, Type *t)
 	Sym *s;
 
 	s = getimportsym(ss);
-	if(s->otype != T && !eqtype(t, s->otype, 0)) {
-		if(!isptrto(t, TFORW))
-			yyerror("import redeclaration of %lS %lT => %lT\n",
+	if(s->otype != T) {
+		// here we should try to discover if
+		// the new type is the same as the old type
+		if(eqtype(t, s->otype, 0))
+			return;
+		if(isptrto(t, TFORW))
+			return;	// hard part
+		warn("redeclare import %S from %lT to %lT",
 			s, s->otype, t);
-		s->otype = t;
+		return;
 	}
-
-	if(s->otype == T)
 	addtyp(newtype(s), t, PEXTERN);
 }