fix: correctly handle escape sequences in strings

Fixes #62

lib/mneme/assertion/pattern_builder.ex

@@ -383,7 +383,7 @@ defmodule Mneme.Assertion.PatternBuilder do
   end
 
   defp string_pattern(string, context) do
-    Pattern.new({:__block__, with_meta([delimiter: ~S(")], context), [escape(string)]})
+    Pattern.new({:__block__, with_meta([delimiter: ~S(")], context), [escape_string(string)]})
   end
 
   defp charlist_pattern(charlist, context) do
@@ -396,7 +396,7 @@ defmodule Mneme.Assertion.PatternBuilder do
   defp heredoc_pattern(string, context) do
     Pattern.new(
       {:__block__, with_meta([delimiter: ~S(""")], context),
-       [string |> escape() |> format_for_heredoc()]}
+       [string |> escape_string() |> format_for_heredoc()]}
     )
   end
 
@@ -408,8 +408,17 @@ defmodule Mneme.Assertion.PatternBuilder do
     end
   end
 
-  defp escape(string) when is_binary(string) do
-    String.replace(string, "\\", "\\\\")
+  defp escape_string(string) when is_binary(string) do
+    # https://hexdocs.pm/elixir/String.html#module-escape-characters
+    string
+    |> String.replace("\\", "\\\\")
+    |> String.replace("\0", "\\0")
+    |> String.replace("\a", "\\a")
+    |> String.replace("\b", "\\b")
+    |> String.replace("\t", "\\t")
+    |> String.replace("\v", "\\v")
+    |> String.replace("\r", "\\r")
+    |> String.replace("\e", "\\e")
   end
 
   defp make_var(name, context) do

lib/mneme/patcher.ex

@@ -44,6 +44,7 @@ defmodule Mneme.Patcher do
 
       {:error, errors, _project} ->
         not_saved = Enum.map(errors, fn %Rewrite.SourceError{path: path} -> path end)
+
         {:error, {:not_saved, not_saved}}
     end
   end

test_integration/basic_test.exs

@@ -49,6 +49,9 @@ defmodule Mneme.Integration.BasicTest do
                 \\
                 bar
                 """
+
+    # y
+    auto_assert "foo\rbar" <- "foo\rbar"
   end
 
   test "tuples" do