Improve workspace system into a hashtable
This commit is contained in:
@@ -12,6 +12,10 @@ let mrb_load_string =
|
||||
foreign "mrb_load_string"
|
||||
(ptr Types.Mrb_state.typ @-> string @-> returning void)
|
||||
|
||||
let mrb_load_file =
|
||||
foreign "kutu_mrb_load_file"
|
||||
(ptr Types.Mrb_state.typ @-> string @-> returning void)
|
||||
|
||||
let error_check mrb_ptr =
|
||||
if Types.Mrb_state.has_error mrb_ptr then begin
|
||||
mrb_print_error mrb_ptr;
|
||||
|
||||
Reference in New Issue
Block a user