module Code_execute: sig
.. end
val build_execute_code : Code_selection_context.code_selection_context ->
Algebra_type.algop_expr ->
bool * Namespace_names.ncname * string ->
Algebra_type.alg_eval_code_dep *
Code_selection_context.code_selection_context
val build_server_implements_code : Code_selection_context.code_selection_context ->
Algebra_type.algop_expr ->
Namespace_names.ncname * string ->
Algebra_type.alg_eval_code_dep *
Code_selection_context.code_selection_context
val build_server_close_code : Code_selection_context.code_selection_context ->
Algebra_type.algop_expr ->
Namespace_names.ncname * string ->
Algebra_type.alg_eval_code_dep *
Code_selection_context.code_selection_context
val build_eval_closure_code : string ->
Code_selection_context.code_selection_context ->
Algebra_type.algop_expr ->
Algebra_type.alg_eval_code_dep *
Code_selection_context.code_selection_context