diff options
Diffstat (limited to '')
-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 f2ea9945..131b2e8b 100644 --- a/src/ExtractToFStar.ml +++ b/src/ExtractToFStar.ml @@ -1550,7 +1550,7 @@ let extract_global_decl_body (ctx : extraction_ctx) (fmt : F.formatter) `static X: u32 = 3;` will be translated to: - `let x_body : result int = Return 3` + `let x_body : result u32 = Return 3` `let x_c : int = eval_global x_body` *) let extract_global_decl (ctx : extraction_ctx) (fmt : F.formatter) |