+ /* 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);