+ sys = malloc_chk(sizeof(SYSTEM), "sys");
+ /* メモリサイズの設定 */
+ sys->memsize = memsize;
+ /* クロック周波数の設定 */
+ sys->clocks = clocks;
+ /* メモリの初期化 */
+ sys->memory = calloc_chk(sys->memsize, sizeof(WORD), "memory");
+ /* CPUの初期化 */
+ sys->cpu = malloc_chk(sizeof(CPU), "cpu");
+ for(i = 0; i < GRSIZE; i++) {
+ sys->cpu->gr[i] = 0x0;
+ }
+ sys->cpu->sp = sys->cpu->pr = sys->cpu->fr = 0x0;
+ /* CASL2プログラムのプロパティ */
+ prog = malloc_chk(sizeof(PROGPROP), "prog");
+}