loading from rootstore
This commit is contained in:
@ -55,8 +55,7 @@ let main =
|
||||
|
||||
Gl.clear_color 0.1 0.2 0.2 1.;
|
||||
|
||||
Memtrace.trace_if_requested ();
|
||||
|
||||
(*Memtrace.trace_if_requested (); *)
|
||||
let ctx =
|
||||
Gv.create ~flags:Gv.CreateFlags.(antialias lor stencil_strokes) ()
|
||||
in
|
||||
@ -142,7 +141,8 @@ let main =
|
||||
in
|
||||
|
||||
ignore
|
||||
(Toploop.use_input out_ppf (String "#use \"topfind\";;\n#list;;"));
|
||||
(Toploop.use_input out_ppf
|
||||
(String "#use \"topfind\";;\n#list;;#require \"lwt\";;"));
|
||||
(* toplevel execution binding *)
|
||||
Ui.(
|
||||
update_bindings ui
|
||||
|
||||
Reference in New Issue
Block a user