Added option for temporary directory

mach/proto/as/comm4.c

@@ -67,6 +67,13 @@ char **argv;
 				fatal("-o needs filename");
 			aoutpath = argv[i];
 			break;
+		case 'T':
+			if (*p != NULL) {
+				extern char *tmp_dir;
+
+				tmp_dir = p;
+			}
+			break;
 		case 'd':
 #ifdef LISTING
 			dflag = 0;

mach/proto/as/comm7.c

@@ -159,8 +159,10 @@ listline(textline)
 			putchar(c);
 		} while ((c = getc(listfile)) != '\n');
 	}
-	if (listflag & 7)
+	if (listflag & 7) {
 		putchar('\n');
+		fflush(stdout);
+	}
 	listeoln = 1;
 	listcolm = 0;
 	listflag = listtemp;
@@ -314,6 +316,11 @@ char *s;
 	return(f);
 }
 
+#ifndef TMPDIR
+#define TMPDIR "/tmp"
+#endif
+char *tmp_dir = TMPDIR;
+
 FILE *
 fftemp(path, tail)
 char *path, *tail;
@@ -321,11 +328,7 @@ char *path, *tail;
 	register char *dir;
 
 	if ((dir = getenv("TMPDIR")) == NULL)
-#ifdef TMPDIR
-		dir = TMPDIR;
-#else
-		dir = "/tmp";
-#endif
+		dir = tmp_dir;
 	sprintf(path, "%s/%s", dir, tail);
 	return(ffcreat(mktemp(path)));
 }