Fix escape sequences

src/main/scala/millfork/parser/TextCodec.scala

@@ -187,7 +187,7 @@ class TableTextCodec(override val name: String,
         val (escSeq, closingBrace) = tail.span(_ != '}')
         closingBrace match {
           case '}' :: xs =>
-            encodeEscapeSequence(log, escSeq.mkString(""), position, options, lenient) ++ encode(log, position, xs, options, lenient)
+            encodeEscapeSequence(log, escSeq.map(_.toChar).mkString(""), position, options, lenient) ++ encode(log, position, xs, options, lenient)
           case _ =>
             log.error(f"Unclosed escape sequence", position)
             Nil

src/test/scala/millfork/test/TextCodecSuite.scala

@@ -67,4 +67,17 @@ class TextCodecSuite extends FunSuite with Matchers {
         | }
       """.stripMargin)
   }
+
+  test("Escape sequences") {
+    val m = EmuUnoptimizedRun(
+      """
+        | void main() {
+        |   pointer p
+        |   p = "{n}"pet
+        |   output = p[0]
+        | }
+        | byte output @$c000
+      """.stripMargin)
+    m.readByte(0xc000) should equal(13)
+  }
 }