autolib (#pragma lib)

added to 6g to autoload
the included import files.

SVN=124759

src/cmd/6g/gen.c

@@ -28,7 +28,6 @@ compile(Node *fn)
 		return;
 	lno = dynlineno;
 
-
 	curfn = fn;
 	dynlineno = curfn->lineno;	// for diagnostics
 	dowidth(curfn->type);

src/cmd/gc/lex.c

@@ -118,7 +118,8 @@ importfile(Val *f)
 		yyerror("import statement not a string");
 		return;
 	}
-	// BOTCH need to get .8 from backend
+
+	// BOTCH need to get .6 from backend
 	snprint(namebuf, sizeof(namebuf), "%Z.6", f->sval);
 	file = strdup(namebuf);
 	linehist(file, 0);
@@ -126,6 +127,7 @@ importfile(Val *f)
 	imp = Bopen(file, OREAD);
 	if(imp == nil)
 		fatal("cant open import: %s", namebuf);
+	linehist(file, -1);	// acts as #pragma lib
 
 	/*
 	 * position the input right

src/cmd/gc/subr.c

@@ -64,13 +64,23 @@ void
 linehist(char *file, long off)
 {
 	Hist *h;
+	char *cp;
 
 	if(debug['i'])
-	if(file != nil)
-		print("%L: import %s\n", file);
-	else
+	if(file != nil) {
+		if(off < 0)
+			print("%L: pragma %s\n", file);
+		else
+			print("%L: import %s\n", file);
+	} else
 		print("%L: <eof>\n");
 
+	if(off < 0 && file[0] != '/') {
+		cp = mal(strlen(file) + strlen(pathname) + 2);
+		sprint(cp, "%s/%s", pathname, file);
+		file = cp;
+	}
+
 	h = alloc(sizeof(Hist));
 	h->name = file;
 	h->line = lineno;