diff options
author | Son Ho | 2023-05-22 17:34:08 +0200 |
---|---|---|
committer | Son HO | 2023-06-04 21:54:38 +0200 |
commit | c823ad32033904fc47cda9a9ae9f3fa3116edc6f (patch) | |
tree | 7175053afb44e006ef4800c3fb78b5063b2a0c18 /compiler/Translate.ml | |
parent | 1f0e5b3cb80e9334b07bf4b074c01150f4abd49d (diff) |
Make progress on extracting the HOL4 files
Diffstat (limited to '')
-rw-r--r-- | compiler/Translate.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/Translate.ml b/compiler/Translate.ml index 709b54a4..1107a123 100644 --- a/compiler/Translate.ml +++ b/compiler/Translate.ml @@ -851,7 +851,7 @@ let extract_file (config : gen_config) (ctx : gen_ctx) (filename : string) (* Close the module *) (match !Config.backend with | FStar | Lean -> () - | HOL4 -> Printf.fprintf out "val _ = export_theory \"%s\"\n" module_name + | HOL4 -> Printf.fprintf out "val _ = export_theory ()\n" | Coq -> Printf.fprintf out "End %s .\n" module_name); (* Some logging *) |