Restore web build

This commit is contained in:
Denis Merigoux 2022-04-11 10:59:02 +02:00
parent a775f786f6
commit 6f223d2519
No known key found for this signature in database
GPG Key ID: EE99DCFA365C3EE3
3 changed files with 2 additions and 3 deletions

View File

@ -298,7 +298,7 @@ website-assets: doc literate_examples grammar.html catala.html build_french_law_
#> all : Run all make commands
all: \
build doc website-assets\
build build_js doc website-assets\
tests \
generate_french_law_library_ocaml build_french_law_library_ocaml \
tests_ocaml bench_ocaml \

View File

@ -19,6 +19,7 @@ let _ =
backend = "Interpret";
language = Some (Js.to_string language);
max_prec_digits = None;
closure_conversion = false;
trace;
disable_counterexamples = false;
optimize = false;

View File

@ -430,8 +430,6 @@ let rec unfold_scope_body_expr (ctx : decl_ctx) (scope_let : scope_body_expr) :
let build_whole_scope_expr
(ctx : decl_ctx) (body : scope_body) (pos_scope : Pos.t) =
let var, body_expr = Bindlib.unbind body.scope_body_expr in
Cli.debug_format "Getting variable %s_%d" (Bindlib.name_of var)
(Bindlib.uid_of var);
let body_expr = unfold_scope_body_expr ctx body_expr in
make_abs
(Array.of_list [ var ])