Fix test for Windows and add test for writeSBML(::Model, ::String)

LCSB-BioCore · Nov 19, 2021 · 5b2918f · 5b2918f
1 parent 2989a06
commit 5b2918f
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/test/loadmodels.jl b/test/loadmodels.jl
@@ -237,5 +237,15 @@ end
 
 @testset "writeSBML" begin
     model = readSBML(joinpath(@__DIR__, "data", "Dasgupta2020.xml"))
-    @test writeSBML(model) == read(joinpath(@__DIR__, "data", "Dasgupta2020-written.xml"), String)
+    expected = read(joinpath(@__DIR__, "data", "Dasgupta2020-written.xml"), String)
+    # Remove carriage returns, if any
+    expected = replace(expected, '\r' => "")
+    @test writeSBML(model) == expected
+    mktemp() do filename, _
+        writeSBML(model, filename)
+        content = read(filename, String)
+        # Remove carriage returns, if any
+        content = replace(content, '\r' => "")
+        @test content == expected
+    end
 end