X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fcomet2.c;h=fedf8951947b8a4232a494d06c9849422691e2d4;hb=bf31ea99380e3ee2198f61f6510ebe6e4a3961f5;hp=6ab8693732410928b2397f9b03f2c25b49e61305;hpb=650f92bf8dfdd0095db993f71f9e3867e7119acc;p=YACASL2.git diff --git a/src/comet2.c b/src/comet2.c index 6ab8693..fedf895 100644 --- a/src/comet2.c +++ b/src/comet2.c @@ -34,9 +34,9 @@ bool loadassemble(char *file) { perror(file); return false; } - progprop->end = progprop->start + - fread(memory, sizeof(WORD), memsize-progprop->start, fp); - if(progprop->end == memsize) { + prog->end = prog->start + + fread(sys->memory, sizeof(WORD), sys->memsize - prog->start, fp); + if(prog->end == sys->memsize) { setcerr(201, NULL); /* Load object file - full of COMET II memory */ fprintf(stderr, "Execute error - %d: %s\n", cerr->num, cerr->msg); status = false; @@ -48,11 +48,11 @@ bool loadassemble(char *file) { /* comet2コマンド */ int main(int argc, char *argv[]) { + int memsize = DEFAULT_MEMSIZE, clocks = DEFAULT_CLOCKS; int opt, status = 0; const char *usage = "Usage: %s [-tTdh] [-M ] [-C ] FILE\n"; - /* エラーの初期化 */ - cerr = malloc_chk(sizeof(CERR), "cerr"); + cerr_init(); addcerrlist_comet2(); /* オプションの処理 */ while((opt = getopt_long(argc, argv, "tTdM:C:h", longopts, NULL)) != -1) { @@ -86,8 +86,9 @@ int main(int argc, char *argv[]) fprintf(stderr, "comet2 error - %d: %s\n", cerr->num, cerr->msg); exit(-1); } - reset(); - progprop->start = 0; + /* COMET II仮想マシンのリセット */ + reset(memsize, clocks); + prog->start = 0; if(loadassemble(argv[optind]) == true) { create_code_type(); /* 命令と命令タイプがキーのハッシュ表を作成 */ exec(); /* プログラム実行 */