invoke pic_panic when evalating pic_boot failed

2015-06-30 01:13:54 +09:00
parent e5f7eda432
commit f4b54c85ea
1 changed files with 7 additions and 1 deletions
@@ -156,7 +156,13 @@ pic_init_core(pic_state *pic)
    pic_init_attr(pic); DONE;
    pic_init_reg(pic); DONE;

-    pic_load_cstr(pic, &pic_boot[0][0]);
+    pic_try {
+      pic_load_cstr(pic, &pic_boot[0][0]);
+    }
+    pic_catch {
+      pic_print_backtrace(pic, xstdout);
+      pic_panic(pic, "");
+    }
  }

  pic_import(pic, pic->PICRIN_BASE);