diff options
| author | Son Ho | 2022-04-27 10:43:07 +0200 |
|---|---|---|
| committer | Son Ho | 2022-04-27 10:43:07 +0200 |
| commit | 41fe2641dccff2881fd965a524c8a962f80b86b2 (patch) | |
| tree | 1a6e854358f68db98d1ca50612d56a4e0d826fa8 | |
| parent | 1c564be556ce3ed0f53e93549ff6573fb36b330b (diff) | |
Make minor updates
Diffstat (limited to '')
| -rw-r--r-- | src/Translate.ml | 1 | ||||
| -rw-r--r-- | src/main.ml | 1 |
2 files changed, 1 insertions, 1 deletions
diff --git a/src/Translate.ml b/src/Translate.ml index c29dd963..d9b42f6b 100644 --- a/src/Translate.ml +++ b/src/Translate.ml @@ -179,6 +179,7 @@ let translate_function_to_pure (config : C.partial_config) { SymbolicToPure.filter_useless_back_calls = mp_config.filter_useless_monadic_calls; + use_state_monad = mp_config.use_state_monad; } in diff --git a/src/main.ml b/src/main.ml index 00693890..9d038f12 100644 --- a/src/main.ml +++ b/src/main.ml @@ -177,7 +177,6 @@ let () = unfold_monadic_let_bindings = !unfold_monads; filter_useless_monadic_calls = !filter_useless_calls; filter_useless_functions = !filter_useless_functions; - add_unit_args = false; use_state_monad = not !no_state; } in |