added support for modhead

This commit is contained in:
sater 1986-11-28 13:47:44 +00:00
parent 17f5bc21e7
commit 59861f883b
2 changed files with 7 additions and 0 deletions

View file

@ -111,6 +111,12 @@ in_init(filename) char *filename; {
error("Bad format %s",filename);
}
in_start() {
#ifdef modhead
fprintf(codefile,"%s",modhead) ;
#endif
}
in_finish() {
}

View file

@ -85,6 +85,7 @@ main(argc,argv) char **argv; {
out_init(argv[1]);
readcodebytes();
itokcost();
in_start();
codegen(startupcode,maxply,TRUE,MAXINT,0);
error("Bombed out of codegen");
}