diff options
| author | Son Ho | 2022-05-16 10:14:26 +0200 |
|---|---|---|
| committer | Son Ho | 2022-05-16 10:14:26 +0200 |
| commit | 773568911d0a81aacc15b1ff8d311948cf54ebe7 (patch) | |
| tree | 8e7e86615ad1073b4cdf3bafce8a7cecf404bd42 /src | |
| parent | 7ca25ab5c3e686eaca2716d003bfb04e742209ec (diff) | |
Fix an issue when extracting assumed values
Diffstat (limited to 'src')
| -rw-r--r-- | src/ExtractToFStar.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ExtractToFStar.ml b/src/ExtractToFStar.ml index 8b37b96a..0bbe591e 100644 --- a/src/ExtractToFStar.ml +++ b/src/ExtractToFStar.ml @@ -1361,7 +1361,7 @@ let extract_fun_decl (ctx : extraction_ctx) (fmt : F.formatter) | LetRec -> "let rec" | And -> "and" | Val -> "val" - | AssumeVal -> "AssumeVal" + | AssumeVal -> "assume val" in F.pp_print_string fmt (qualif ^ " " ^ def_name); F.pp_print_space fmt (); |