@@ -74,9 +74,11 @@ escape chars =
77+ | c == '\r' -> escape cs
77 | c == '\n' -> '\\' : 'n' : escape cs
78 | c == '\n' -> '\\' : 'n' : escape cs
78 | c == '\"' -> '\\' : '"' : escape cs
79 | c == '\"' -> '\\' : '"' : escape cs
79 | c == '\'' -> '\\' : '\'' : escape cs
80 | c == '\'' -> '\\' : '\'' : escape cs
81+ | c == '\\' -> '\\' : '\\' : escape cs
80 | otherwise -> c : escape cs
82 | otherwise -> c : escape cs