From be9c975fa7df858083e48aa7bd42fff475abeac4 Mon Sep 17 00:00:00 2001
From: Son HO
Date: Thu, 22 Sep 2022 16:27:48 +0200
Subject: Update src/ExtractToFStar.ml

---
 src/ExtractToFStar.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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)
-- 
cgit v1.2.3