diff options
author | stuebinm | 2024-06-29 21:31:22 +0200 |
---|---|---|
committer | stuebinm | 2024-06-29 22:11:04 +0200 |
commit | 59214186b817329342d9d72e23adf12f7a3b1348 (patch) | |
tree | 8292abe4ca52e9742f6a4ff9d102565a6362e665 /compiler/Main.ml | |
parent | 5590dc87a5426cbcb32a2387701d179e107a9792 (diff) |
had some fun writing an IsabelleHOL backend
(do not actually use this, most things are broken, and the primitives
lib barely exists and is simply incorrect. But it is enough to create
syntax-correct Isabelle code for relatively simply rust code, as long
as it does not contain any uses of traits)
Diffstat (limited to '')
-rw-r--r-- | compiler/Main.ml | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/compiler/Main.ml b/compiler/Main.ml index d78b9081..ff6a4d67 100644 --- a/compiler/Main.ml +++ b/compiler/Main.ml @@ -253,6 +253,12 @@ let () = (* We don't support fuel for the HOL4 backend *) if !use_fuel then ( log#error "The HOL4 backend doesn't support the -use-fuel option"; + fail ()) + | IsabelleHOL -> + record_fields_short_names := true; + (* We don't support fuel for the IsabelleHOL backend *) + if !use_fuel then ( + log#error "The IsabelleHOL backend doesn't support the -use-fuel option"; fail ())) in |