module header is proper Rust comment

lemastero · Dec 14, 2023 · c933d1b · c933d1b
1 parent 0a6d976
commit c933d1b
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/src/Agda/Compiler/Rust/Backend.hs b/src/Agda/Compiler/Rust/Backend.hs
@@ -95,4 +95,4 @@ writeModule opts _ _ mName cdefs = do
 -- TODO and change to TopLevelModuleName -> String
 -- TODO ideally test using real file
 moduleHeader :: String -> String
-moduleHeader mName = "*** module " <> mName <> " ***\n"
+moduleHeader mName = "// module " <> mName <> "\n"
diff --git a/test/Hello.rs b/test/Hello.rs
@@ -1,4 +1,4 @@
-*** module test.Hello ***
+// module test.Hello
 Bool = Datatype {
   dataPars       = 0
   dataIxs        = 0

diff --git a/test/RustBackendTest.hs b/test/RustBackendTest.hs
@@ -15,7 +15,7 @@ testIsEnabled = TestCase
 
 testModuleHeader :: Test
 testModuleHeader = TestCase
-  (assertEqual "moduleHeader" (moduleHeader "foo") "*** module foo ***\n")
+  (assertEqual "moduleHeader" (moduleHeader "foo") "// module foo\n")
 
 tests :: Test
 tests = TestList [