diff os9/mc09/mc2.c @ 102:09148bb27659

fix
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Thu, 27 Dec 2018 16:03:36 +0900
parents 990add11e9f8
children 096b3fc7aa66
line wrap: on
line diff
--- a/os9/mc09/mc2.c	Thu Dec 27 15:40:50 2018 +0900
+++ b/os9/mc09/mc2.c	Thu Dec 27 16:03:36 2018 +0900
@@ -1,7 +1,7 @@
 
 #define DEBUG	error(-1)
 
-#include "mclib.c"
+#include "mclibos9.c"
 
 #define INT	(-1)
 #define CHAR	(-2)
@@ -176,10 +176,11 @@
 char **argv;
 {NMTBL *nptr;
 int i;
-char *ccout;
+char *ccout,*modname;
 	if(argc==1) exit(1);
 	lsrc = chk = asmf = 0;
 	ccout = "C.OUT";
+	modname = "aout";
 	ac=argc;
 	av=argv;
 	for (ac2=1; (ac2 < ac) && (*av[ac2] == '-'); ++ac2)
@@ -190,6 +191,9 @@
 		case 'O': case 'o':
 			ccout = av[ac2]+2;
 			break;
+                case 'M': case 'm':
+                       modname = av[ac2]+2;
+                       break;
 		case 'C': case 'c':
 			chk = 1;
 			break;
@@ -198,8 +202,13 @@
 			exit(1);
 		}
 	fclose(stdout);
-	if (!chk)
-		if ( (obuf = fopen(ccout,"wc")) == NULL ) error(FILERR);
+        if (!chk) {
+              if ( (obuf = fopen(ccout,"w")) == NULL ) error(FILERR);
+                else {
+                    printf("\tmod   _eom,_name,_tylg,_atrv,_main,_GLOBALS\n");    /* os9 module header */
+                    printf("_name      fcs   /%s/\n",modname);
+                }
+        }
 	init();
 	while(1)
 	{	for (nptr = &ntable[GSYMS],i=LSYMS; i--;)