Fix failing test on Mac

Author: timhall

specs/Specs.bas

@@ -258,7 +258,7 @@ Public Function Specs() As SpecSuite
 
     With Specs.It("should json-encode strings")
         Dim Strings As Variant
-        Strings = Array("""\" & vbCrLf & vbTab & vbBack & vbFormFeed, ChrW(128) & ChrW(32767), "#$%&{|}~")
+        Strings = Array("""\" & vbCr & vbLf & vbTab & vbBack & vbFormFeed, ChrW(128) & ChrW(32767), "#$%&{|}~")
 
         JsonString = JsonConverter.ConvertToJson(Strings)
         .Expect(JsonString).ToEqual "[""\""\\\r\n\t\b\f"",""\u0080\u7FFF"",""#$%&{|}~""]"