console/boot
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

lol took me forever to understand lwt but finally have concurrency in the actor event processing handlers

Browse Source
This commit is contained in:
cqc
2021-10-07 14:07:26 -05:00
parent c8e9e1bd6c
commit 630ccb0a6f
7 changed files with 256 additions and 332 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
init.ml
View File

@ -6,11 +6,13 @@ let print_directives () =
Format.printf "directive_info_table:@.";
Hashtbl.iter (fun n _ -> Format.printf "\t%s@." n) Topinf.directive_info_table;;
#directory "+compiler-libs";;
(*#directory "+compiler-libs";; *)
let print_modules () =
Format.printf "Env.fold_modules !Topinf.toplevel_env :\n";
Env.fold_modules (fun modname _ _ () -> Format.printf "\t%s@." modname) None !Topinf.toplevel_env ();;
(*print_modules ();;*)
#use_silently "main.ml";;
#use_silently "human.ml";;
start ();;