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