diff options
author | Son Ho | 2023-12-21 14:37:43 +0100 |
---|---|---|
committer | Son Ho | 2023-12-21 14:37:43 +0100 |
commit | 8835d87df111d09122267fadc9a32f16b52d234a (patch) | |
tree | 43a1fd0e3ec0e8b94834744396b86bbd3084c888 /compiler/Translate.ml | |
parent | e90b23a0d42e2ea6805c88d6eaa4f9e5370a1dc1 (diff) |
Make good progress on merging the fwd/back functions
Diffstat (limited to '')
-rw-r--r-- | compiler/Translate.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/Translate.ml b/compiler/Translate.ml index 631a5af9..5584fb9a 100644 --- a/compiler/Translate.ml +++ b/compiler/Translate.ml @@ -129,7 +129,7 @@ let translate_function_to_pure (trans_ctx : trans_ctx) in let sg = - SymbolicToPure.translate_fun_sig_to_decomposed trans_ctx (FRegular def_id) + SymbolicToPure.translate_fun_sig_to_decomposed trans_ctx def_id fdef.signature input_names in @@ -151,6 +151,7 @@ let translate_function_to_pure (trans_ctx : trans_ctx) let ctx = { + decls_ctx = trans_ctx; SymbolicToPure.bid = None; sg; (* Will need to be updated for the backward functions *) |