* Add tests for #41563

packages/fcl-json/tests/testjsonreader.pas

@@ -325,6 +325,8 @@ begin
   DoTestString('A string');
   DoTestString('');
   DoTestString('\"','"');
+  DoTestString('a\\','a\');
+  DoTestString('C:\\Windows','C:\Windows');
   DoTestString('\u00f8','ø'); // this is ø
   DoTestString('\u00f8\"','ø"'); // this is ø"
   DoTestString('\ud83c\udf1f',GlowingStar);