From efb76ef18fdb95cff22d142696428229ca7ca189 Mon Sep 17 00:00:00 2001
From: Son Ho
Date: Sun, 17 Mar 2024 04:56:34 +0100
Subject: Fix a minor issue
---
compiler/Translate.ml | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/Translate.ml b/compiler/Translate.ml
index 48a3685b..fba1dfb0 100644
--- a/compiler/Translate.ml
+++ b/compiler/Translate.ml
@@ -1086,7 +1086,7 @@ let translate_crate (filename : string) (dest_dir : string) (crate : crate) :
let exe_dir = Filename.dirname Sys.argv.(0) in
let primitives_src_dest =
match !Config.backend with
- | FStar -> Some ("/backends/fstar/merge/Primitives.fst", "Primitives.fst")
+ | FStar -> Some ("/backends/fstar/Primitives.fst", "Primitives.fst")
| Coq -> Some ("/backends/coq/Primitives.v", "Primitives.v")
| Lean -> None
| HOL4 -> None
--
cgit v1.2.3