X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=src%2Fstruct.c;h=1fb4326d176e1263c8de7e5f8dd45fca905df721;hp=31be1e661b7da8351423c64d5c83903976c82b0f;hb=642867fe75b98a25a4ec82b69b9ea50771d08985;hpb=faec695d5b7ecf7dd3e4a07ac926ea93ca89020b diff --git a/src/struct.c b/src/struct.c index 31be1e6..1fb4326 100644 --- a/src/struct.c +++ b/src/struct.c @@ -3,45 +3,42 @@ /* COMET IIのメモリ */ WORD *memory; -/* COMET IIのCPUレジスタ */ -WORD GR[REGSIZE], SP, PR, FR; - -/* エラーメッセージ */ -int cerrno = 0; -char *cerrmsg; - -/* レジストリの内容を表示する場合はtrue */ -bool tracemode = false; - -/* レジストリの内容を論理値(0〜65535)で表示する場合はtrue */ -bool logicalmode = false; - -/* メモリの内容を表示する場合はtrue */ -bool dumpmode = false; - -/* ソースを表示する場合はtrue */ -bool srcmode = false; - -/* ラベル表を表示する場合はtrue */ -bool labelmode = false; - -/* ラベル表を表示して終了する場合はtrue */ -bool onlylabelmode = false; - -/* アセンブラ詳細結果を表示する場合はtrue */ -bool asdetailmode = false; - -/* アセンブルだけを行う場合はtrue */ -bool onlyassemblemode = false; - -/* メモリーサイズ */ +/* メモリサイズ */ int memsize = DEFAULT_MEMSIZE; +/* COMET IIのCPU */ +CPU *cpu; + /* クロック周波数 */ int clocks = DEFAULT_CLOCKS; -/* 実行開始番地 */ -WORD startptr = 0x0; - -/* 実行終了番地 */ -WORD endptr = 0x0; +/* CASL2プログラムのプロパティ */ +PROGPROP *progprop; + +/* COMET II仮想マシンのリセット */ +void reset() +{ + int i; + + /* メモリの初期化 */ + memory = malloc_chk(memsize * sizeof(WORD), "memory"); + for(i = 0; i < memsize; i++) { + memory[i] = 0x0; + } + /* CPUの初期化 */ + cpu = malloc_chk(sizeof(CPU), "cpu"); + for(i = 0; i < GRSIZE; i++) { + cpu->gr[i] = 0x0; + } + cpu->sp = cpu->pr = cpu->fr = 0x0; + /* CASL2プログラムのプロパティ */ + progprop = malloc_chk(sizeof(PROGPROP), "progprop"); +} + +/* COMET II仮想マシンのシャットダウン */ +void shutdown() +{ + free(progprop); + free(cpu); + free(memory); +}