update benz (funcall API change)
This commit is contained in:
parent
ec0f9a952b
commit
8d7f63d71e
|
@ -1 +1 @@
|
||||||
Subproject commit 678d2484ec989b082d0db2dffda5d0a391cecc50
|
Subproject commit db5a4e367b86d76c6be993ed4ffe611385465d5d
|
|
@ -56,15 +56,17 @@ int
|
||||||
main(int argc, char *argv[], char **envp)
|
main(int argc, char *argv[], char **envp)
|
||||||
{
|
{
|
||||||
pic_state *pic;
|
pic_state *pic;
|
||||||
|
struct pic_lib *PICRIN_MAIN;
|
||||||
int status = 0;
|
int status = 0;
|
||||||
|
|
||||||
pic = pic_open(argc, argv, envp);
|
pic = pic_open(argc, argv, envp);
|
||||||
|
|
||||||
pic_init_picrin(pic);
|
pic_init_picrin(pic);
|
||||||
|
|
||||||
|
PICRIN_MAIN = pic_find_library(pic, pic_read_cstr(pic, "(picrin main)"));
|
||||||
|
|
||||||
pic_try {
|
pic_try {
|
||||||
pic_import(pic, pic_read_cstr(pic, "(picrin main)"));
|
pic_funcall(pic, PICRIN_MAIN, "main", pic_nil_value());
|
||||||
pic_funcall(pic, "main", pic_nil_value());
|
|
||||||
}
|
}
|
||||||
pic_catch {
|
pic_catch {
|
||||||
pic_print_backtrace(pic, pic->err);
|
pic_print_backtrace(pic, pic->err);
|
||||||
|
|
Loading…
Reference in New Issue