@@ -1,3 +1,7 @@
+#ifndef NORCSID
+static char rcsid2[] = "$Header$";
+#endif
+
#include <stdio.h>
#include "assert.h"
#include <em_spec.h>
@@ -203,6 +207,7 @@ dopseudo() {
case EOF:
swtxt();
popstr(0);
+ tstoutput();
exit(0);
default:
error("Unknown opcode %d",savetab1);
@@ -330,6 +335,7 @@ dopseudo() {
#ifdef REGVARS
unlinkregs();
#endif
break;
error("No table entry for %d",savetab1);
+static char rcsid[] = "$Header$";
#include "param.h"
@@ -59,6 +63,12 @@ out_finish() {
fclose(codefile);
}
+tstoutput() {
+ if (ferror(codefile))
+ error("Write error on output");
+}
gencode(code) register char *code; {
register c;
int tokno,fldno,insno,regno,subno;