Mercurial > hg > Members > kono > os9 > sbc09
diff os9/mc09/mc.c @ 104:096b3fc7aa66
fix
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 28 Dec 2018 17:43:55 +0900 |
parents | 15569aa4098e |
children | 6eef99bb4771 |
line wrap: on
line diff
--- a/os9/mc09/mc.c Thu Dec 27 20:16:34 2018 +0900 +++ b/os9/mc09/mc.c Fri Dec 28 17:43:55 2018 +0900 @@ -183,10 +183,11 @@ {NMTBL *nptr; int i; char *ccout; -char *modname = "aout"; +char *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) @@ -211,8 +212,8 @@ 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); + printf("\tmod _eom,_name,_tylg,_atrv,_start,_GLOBALS\n"); /* os9 module header */ + printf("_name fcs /%s/\n\tfcb 0\n",modname); } } init();