Let VString be multi-line by default, add hint escape

Author: yuxiaomao

hld/Eval.hx

@@ -935,8 +935,10 @@ class Eval {
 			switch( [v.t, v.hint] ) {
 			case [HBytes, HReadBytes(t, pos)]:
 				readBytesStrAt(-1, i -> readByte(p.offset(i)), t, pos);
-			default:
+			case [_, HEscape]:
 				"\"" + escape(s) + "\"";
+			default:
+				"\"" + s + "\"";
 			}
 		case VClosure(f, d, _), VMethod(f, d, _): funStr(f, v.hint == HPointer) + "[" + valueStr(d,maxStringRec) + "]";
 		case VFunction(f,_): funStr(f, v.hint == HPointer);

hld/Value.hx

@@ -33,6 +33,7 @@ enum Hint {
 	HHex; // v:h
 	HBin; // v:b
 	HPointer; // v:p
+	HEscape; // v:s
 	HReadBytes(t : HLType, pos : String); // v:UI8(0), v:UI16(0), v:I32(0), v:I64(0), v:F32(0), v:F64(0)
 	HEnumFlags(t : String); // v:EnumFlags<T>, v:haxe.EnumFlags<T>
 	HEnumIndex(t : String); // v:EnumIndex<T>
@@ -51,6 +52,8 @@ enum Hint {
 			return HBin;
 		if( s == "p" )
 			return HPointer;
+		if( s == "s" )
+			return HEscape;
 		if( StringTools.startsWith(s,"UI8(") && StringTools.endsWith(s,")") )
 			return HReadBytes(HUi8, s.substr(4, s.length - 5));
 		if( StringTools.startsWith(s,"UI16(") && StringTools.endsWith(s,")") )