src/struct.c

   1 #include "struct.h"
   2 #include "cmem.h"
   3
   4 /* COMET IIの仮装実行マシンシステム */
   5 SYSTEM *sys;
   6
   7 /* CASL IIプログラムのプロパティ */
   8 PROGPROP *prog;
   9
  10 /* COMET II仮想マシンのリセット */
  11 void reset(int memsize, int clocks)
  12 {
  13     int i;
  14
  15     sys = malloc_chk(sizeof(SYSTEM), "sys");
  16     /* メモリサイズの設定 */
  17     sys->memsize = memsize;
  18     /* クロック周波数の設定 */
  19     sys->clocks = clocks;
  20     /* メモリの初期化 */
  21     sys->memory = calloc_chk(sys->memsize, sizeof(WORD), "memory");
  22     /* CPUの初期化 */
  23     sys->cpu = malloc_chk(sizeof(CPU), "cpu");
  24     for(i = 0; i < GRSIZE; i++) {
  25         sys->cpu->gr[i] = 0x0;
  26     }
  27     sys->cpu->sp = sys->cpu->pr = sys->cpu->fr = 0x0;
  28     /* CASL2プログラムのプロパティ */
  29     prog = malloc_chk(sizeof(PROGPROP), "prog");
  30 }
  31
  32 /* COMET II仮想マシンのシャットダウン */
  33 void shutdown()
  34 {
  35     free_chk(prog, "prog");
  36     free_chk(sys->memory, "sys.memory");
  37     free_chk(sys->cpu, "sys.cpu");
  38     free_chk(sys, "sys");
  39 }